控制插入符号的html输出中的位数

Question

我有代码

```{r comment=NA}
require(caret)
set.seed(42)
tc <- trainControl(method="cv")
m <- train(x=longley[,-ncol(longley)],
           y=longley[,ncol(longley)],
           method="pls")
m
```

在控制台

中产生不错的输出

Partial Least Squares 

16 samples
 6 predictors

No pre-processing
Resampling: Bootstrapped (25 reps) 

Summary of sample sizes: 16, 16, 16, 16, 16, 16, ... 

Resampling results across tuning parameters:

  ncomp  RMSE   Rsquared  RMSE SD  Rsquared SD
  1      1.39   0.836     0.552    0.155      
  2      1.08   0.899     0.387    0.103      
  3      0.592  0.976     0.187    0.0183     

RMSE was used to select the optimal model using  the smallest value.
The final value used for the model was ncomp = 3. 

但是在html生成期间，所有数值都是舍入的

如何在html中保存与控制台中相同的输出？

进一步调查和解决方法

我使用RStudio。刚开始R会话后getOption("digits")返回7.但是duting html生成数字输出是四舍五入的。控制台输出正常。
如果我在代码块中设置options(digits = 7)，则html和控制台输出都变得相同且正确。

我无法理解这种行为，但它确实有效。这是一个错误还是一个功能？

Answer 1

这是一个问题，我还没有完全决定如何处理它。我可能会停止更改 knitr 中的默认位数（即接受此pull request）。在此之前，您需要将options(digits = 7)放在文档的开头。