r - R 中带前导加号的格式

Question

您好，我想在 R 中格式化一个带有前导加号的数字，可以吗？

在这种特殊情况下，我需要它，因为我想将 lm 结果转换为公式。

例如

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

Answer 1

我建议使用sprintf，例如

sprintf("%+.2f", c(0.5, -3.8))
#[1] "+0.50" "-3.80"

阅读 help("sprintf") 了解有关格式选项的更多信息。