`kableExtra::kbl()` 数字被忽略

【问题标题】：`kableExtra::kbl()` digits is ignored`kableExtra::kbl()` 数字被忽略
【发布时间】：2023-01-28 06:53:47
【问题描述】：

当向kableExtra::kbl() 指定四位数字时，它们将被忽略。

考虑

set.seed(423423)
dat <- data.frame(y = rnorm(n = 10, mean = 0, sd = 1))

print(dat, digits = 10)
#>                 y
#> 1  -0.19283314742
#> 2  -0.02577895889
#> 3   0.40861185274
#> 4   4.02791235921
#> 5   0.07579388805
#> 6  -2.12905634675
#> 7   0.13334935904
#> 8  -0.47837133966
#> 9  -1.08703811240
#> 10  0.06579553751

由 reprex 包 (v2.0.1) 创建于 2023-01-27

kableExtra::kbl(dat, digits = 4)

[![kbl][1]][1]

这是怎么回事？ [1]:https://i.stack.imgur.com/3AZeb.png

【问题讨论】：

标签： r kableextra

【解决方案1】：

诀窍在于getOptions(digit)。

全局 digit 必须大于或等于 kbl 中指定的 digit。

从上面的例子

getOption("digits")
# [1] 2

这少于我想要的位数 4 所以返回的 kbl 由 2 dps 组成。

因此，将全局数字重置为 10 就可以了：

options(digits = 10)
set.seed(423423)
dat <- data.frame(y = rnorm(n = 10, mean = 0, sd = 1))

dat
#>                 y
#> 1  -0.19283314742
#> 2  -0.02577895889
#> 3   0.40861185274
#> 4   4.02791235921
#> 5   0.07579388805
#> 6  -2.12905634675
#> 7   0.13334935904
#> 8  -0.47837133966
#> 9  -1.08703811240
#> 10  0.06579553751

kableExtra::kbl(dat, digits = 4)

【讨论】：