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

x <- 1.128347132904321674821

编辑:

用途:

options(digits=2)

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

--

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


当前回答

这是我从单位到百万的方法。 Digits参数让我调整有效值(整数+小数)的最小数量。你可以先调整里面的十进制四舍五入。

number <-function(number){
  result <- if_else(
    abs(number) < 1000000,
    format(
      number, digits = 3,
      big.mark = ".",
      decimal.mark = ","
    ),
    paste0(
      format(
        number/1000000,
        digits = 3,
        drop0trailing = TRUE,
        big.mark = ".",
        decimal.mark = ","
      ),
      "MM"
    )
  )
  # result <- paste0("$", result)
  return(result)
}

其他回答

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

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

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

在我看来就像是

library(tutoR)
format(1.128347132904321674821, 2)

根据一点在线帮助。

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

round(data, 2)

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

就像这样:

options(digits=2)

数字选项的定义:

digits: controls the number of digits to print when printing numeric values.

检查prettyNum、format函数

使用sprintf(x, fmt='%#.4g')来测试0(例如123.1240)