R：如何像在Excel中那样定义舍入函数？

Question

[我只是知道，与Excel相比，R或Python具有不同的定义舍入函数的方式。

除了统计参数外，我的企业用户主要是Excel用户。由于这种舍入约定，R / Python脚本生成的数字可能会有所不同，这引起了一些混乱。

在我看来，当Excel需要计算1.5、2.5、3.5等数字时，Excel总是“向上取整”，而R / Python会取整为最接近的偶数。

可能还有其他假设，我不知道是哪个区分了Excel和R / Python。

有没有办法从R中的Excel中实现确切的舍入功能？

在Excel中

在R中

谢谢

编辑：赞赏周到的否决。如果您没有其他要补充的内容，请不要在这里留下盲目的否定票。

Answer 1

基于观察到的行为，Excel中的round对于以0.5结尾的数字四舍五入为零，可以使用以下命令将其复制到R中：

> x <- c(-1.5, -0.5, 0.5, 1.5, 2.5, 3.5)
> round(x+2*sign(x)*.Machine$double.eps)
# [1] -2 -1  1  2  3  4