R - f_num, но с запятой

Question

Функция f_num из пакета numform удаляет начальные нули из числа:

f_num(0.1)

Вывод:

.1

Мне нужна та же самая вещь, но с запятой вместо периода. Также было бы здорово, если бы сохранялась функциональность функции f_num, которая позволяет округлять количество десятичных знаков.

Answer 1

Вот пользовательская альтернатива (см. Примечание ниже):

detrail <- function(num,round_dec=NULL){

   if(!is.null(round_dec)){
    num<-round(num,round_dec)
   }
   gsub("^\\d\\.",",",num)

 }
 detrail(0.1)
[1] ",1"
 detrail(1.1)
[1] ",1"

detrail(0.276,2)
[1] ",28"

ПРИМЕЧАНИЕ :

• Чтобы прочитать это как цифры c, вы Вам нужно будет изменить параметры (OutDe c) на , вместо . ie options(OutDec= ","). Я этого не делал, так как не люблю изменять глобальные параметры. См. Также
• Это также удаляет любое число, которое не равно нулю. Отключите это, используя 0 вместо \\d.