我希望R控制台的输出看起来是可读的。为此,我希望R将所有数字四舍五入到最接近的小数点后N位。我有一些成功,但它并不完全工作:
> options(scipen=100, digits=4)
> .000000001
[1] 0.000000001
> .1
[1] 0.1
> 1.23123123123
[1] 1.231
我希望0.000000001显示为简单的0。如何做到这一点呢?让我说得更具体一点:我希望对整个R会话进行全局修复。我意识到我可以通过四舍五入来开始修改内容,但这比简单地设置整个会话的内容更有用。
看看?options
,特别是digits
和scipen
选项。
try
sprintf("%.4f", 0.00000001)
[1] "0.0000"
结合Greg Snow和Ricardo Saporta已经给出的答案可以得到正确的答案:options('scipen'=+20) and options('digits'=2)
,结合round(x,4)
。
round(x,4)
将舍入接近零的小数值。
你可以四舍五入一次你的回归结果并存储它:
x <- round(x, 4)
…否则,如果你不想存储它的四舍五入值,你就必须在每次显示小数量时都这样做。在你的例子中,既然你说小的接近零的量有效地代表零,为什么不把它四舍五入呢?
如果出于某种原因你需要同时保留精确和四舍五入的版本,那么就这样做。
x.rounded <- round(x, 4)