我有一个数字,例如1.128347132904321674821,我想在输出到屏幕(或写入到文件)时仅显示两个小数点后的位置。要怎么做呢?

x <- 1.128347132904321674821

编辑:

用途:

options(digits=2)

被认为是一个可能的答案。是否有一种方法可以在脚本中指定这一点,以便一次性使用?当我将它添加到我的脚本时,它似乎没有做任何不同的事情,我对大量重新输入来格式化每个数字不感兴趣(我正在自动化一个非常大的报告)。

--

答案:整数(x,数字=2)


当前回答

函数formatC()可用于将数字格式化到小数点后两位。即使结果值包含后面的零,此函数也会给出两位小数。

其他回答

如果你更喜欢有效数字而不是固定数字,那么signif命令可能会有用:

> signif(1.12345, digits = 3)
[1] 1.12
> signif(12.12345, digits = 3)
[1] 12.1
> signif(12345.12345, digits = 3)
[1] 12300

你可以格式化一个数字,比如x,直到你想要的小数点。这里x是一个小数点后很多位的数。假设我们希望显示这个数字的小数点后8位:

x = 1111111234.6547389758965789345
y = formatC(x, digits = 8, format = "f")
# [1] "1111111234.65473890"

这里format="f"给出的是小数点后的浮点数,比如xxx。Xxx, digits表示数字位数。相比之下,如果你想要显示一个整数,你可以使用format="d"(很像sprintf)。

小数点后两位假设你想保持后面的0

sprintf(5.5, fmt = '%#.2f')

这给了

[1] "5.50"

正如下面@mpag提到的,似乎R有时会给出意想不到的值,而舍入方法,例如sprintf(5.5550, fmt='%#.2f')给出5.55,而不是5.56

你可以试试我的打包格式。

> # devtools::install_github("renkun-ken/formattable")
> library(formattable)
> x <- formattable(1.128347132904321674821, digits = 2, format = "f")
> x
[1] 1.13

好处是,x仍然是一个数字向量,你可以用同样的格式做更多的计算。

> x + 1
[1] 2.13

更好的是,数字不会丢失,你可以用更多的数字重新格式化:)

> formattable(x, digits = 6, format = "f")
[1] 1.128347

如果你只是想四舍五入一个数字或一个列表,只需使用

round(data, 2)

然后,数据将四舍五入到小数点后2位。