Hmisc包的describe()函数设置位数

Question

我尝试在 latex 中导出 describe() 函数的结果时设置位数。

MWE：

require("Hmisc")
dat <- rnorm(1000,mean = 0, sd = 1)
latex(describe(dat, digits=2))

产生以下输出：

digits 参数似乎没有任何效果：均值和 min/max 值都没有修改位数。知道设置位数吗？

Answer 1

describes的digits参数用于设置options(digits = digits)。
即digits指定最小数要打印的有效数字（参见?options）。
我们开始考虑一个随机数向量mean=5，sd=1，并设置digits=2。

library(Hmisc)
oldopt <- options("digits")
set.seed(1)
dat <- rnorm(1000, mean = 5, sd = 1)
dgts <- 2
dscr <- describe(dat, digits=dgts)
options(digits = dgts)
outltx <- latex(dscr, file="describe.tex")
dvips(outltx)
options(digits = oldopt$digits)

输出为：

此处最小有效位数为2：小数点前一位，小数点后一位（例如第95个百分位数为6.7）。

现在我们考虑一个随机数向量mean=0，sd=0.01，并设置digits=2。

oldopt <- options("digits")
set.seed(1)
dat <- rnorm(1000, mean = 0, sd = 0.01)
dgts <- 2
dscr <- describe(dat, digits=dgts)
options(digits = dgts)
outltx <- latex(dscr, file="describe.tex")
dvips(outltx)
options(digits = oldopt$digits)

同样，有效数字的最小位数是2；例如中位数（.50）是-0.00035，即有2位有效数字（3和5）。

Hmisc包的describe()函数设置位数

Set the number of digits in describe() function of Hmisc package

r

hmisc