您好，我想格式化一个带有R的前导加号的数字，这可能吗？
在这种特殊情况下，我需要它，因为我想将lm结果转换为公式。
e.g。
res <- lm(...)
coeff <- summary(res)$coef[-1, 1]
paste(format(summary(res)$coef[1, 1],scientific=F,digits=3),paste(format(coeff,scientific=F,digits=3,trim=T),names(coeff),sep="*",collapse=""),sep="")
目前返回类似
的内容0.0345-0.0001189*A0.0000228*B0.0000276*C0.0000264*D-0.0000872*E-0.0000309*F
答案 0 :(得分：3)
我建议使用sprintf，例如
sprintf("%+.2f", c(0.5, -3.8))
#[1] "+0.50" "-3.80"
阅读help("sprintf")以了解有关格式化选项的更多信息。
答案 1 :(得分：0)
如果用
修复了此问题myformat <- function(x,...) paste(ifelse(x>=0,"+",""),format(x,...),sep="")
但是有一个内置的说明符吗？