Скрыть ноль до десятичной точки

Question

Написав статью с R + Sweave, я хочу скрыть нуль до десятичной точки для результатов корреляции. Например, для оценки 0.85, я хочу показать это как .85. Или, если оценка отрицательна, например. -0.85, его следует указывать как -.85.

Сейчас я делаю это очень уродливо, используя substr(0.85, 2, 4) для положительных значений и paste("-", substr(-0.85, 3, 5), sep="") для отрицательных значений. Я сделал домашнюю работу, проверив такие функции, как format() и formatC в базовом пакете, но ни один из них, похоже, не отвечал моим потребностям.

Так что я задаюсь вопросом, есть ли более простой способ скрыть ноль до десятичной точки в R? Любая помощь приветствуется.

Answer 1

Я хотел бы использовать регулярное выражение:

sub('^(-)?0[.]', '\\1.', c(0.85, -0.85)) 
## [1] ".85" "-.85"