r - 为什么 `options(digits=3)` 在 `knitr' 中被忽略？

Question

当我在 R 中逐行运行以下代码时，它工作正常，但使用 knitr 时，options(digits=3) 会被忽略。

为什么？有什么解决办法吗？

<<cor>>=
#mock up data set.
x <- c(rnorm(100))
y <- c(rnorm(100))
z <- c(rnorm(100))
df <- as.data.frame(cbind(x,y,z))
df$x<- as.numeric(df$x)
df$y<- as.numeric(df$y)
df$z<- as.numeric(df$z)
options(digits=3)
cor(df, use = 'na.or.complete', method = c("spearman"))
@

Answer 1

我在搜索另一个问题时找到了解决方案。省略 options(digits=3) 并使用

round(cor(df, use = "na.or.complete", method = c("spearman")), digits = 3)

这留下了为什么 options(...) 不起作用的问题。但我可以愉快地接受它!

感谢大家的宝贵时间!

杰瑞特