R中的舍入数字最接近10

Question

现在,关于舍入和重要性的问题有一些非常类似的问题,但非解决了我的问题.这里是:

如何围绕这些随机出现的数字:

data <- c(152.335, 39.431, 21.894)

我想让它们像这样四舍五入:

c(150,40,20)

我试过了:

print(formatC(signif(data,digits=2), digits=2,format="f"))

输出:

[1] "150.00" "39.00"  "22.00"

上面的命令要求我将其更改digits=为1或2以获得所需的结果.但是,我希望全球适合所有指挥.谢谢.

Answer 1

从 ?round

舍入为负数位意味着舍入为10的幂,因此例如'round(x,digits = -2)'舍入到最接近的百位.

所以,

data <- c(152.335, 39.431, 21.894)
round(data, -1)
#[1] 150  40  20