在 r 中存储 pcr 对象的摘要输出

Question

我正在尝试使用 pls 库进行主成分回归，并且我尝试将摘要输出存储到变量 c 但没有成功。这是我的代码示例

 library (pls)
 b <- pcr(perm ~ area + peri + shape, data = rock, validation = "CV")
 c <- summary(b)
 c
 NULL

我想要的是将 pcr 模型的汇总输出存储到一个变量中，以便以后访问它。任何使这项工作成功的提示都将不胜感激

Answer 1

我认为你需要 capture.output()。我记得有一段时间使用它是从一个 Whosebug 线程本身学习的：

library (pls)
b <- pcr(perm ~ area + peri + shape, data = rock, validation = "CV")
x<-(capture.output(summary(b)))
x

结果：

> x
 [1] "Data: \tX dimension: 48 3 "                     "\tY dimension: 48 1"                           
 [3] "Fit method: svdpc"                             "Number of components     considered: 3"           
 [5] ""                                              "VALIDATION: RMSEP"                            
 [7] "Cross-validated using 10 random segments."     "       (Intercept)  1 comps  2 comps  3 comps"
 [9] "CV           442.5    394.7    271.2    293.9" "adjCV        442.5        393.9    269.8    290.7"
[11] ""                                              "TRAINING: % variance explained"               
[13] "      1 comps  2 comps  3 comps"               "X       94.07   100.00       100.00"              
[15] "perm    23.01    68.33    70.44"

在 r 中存储 pcr 对象的摘要输出

store summary output of pcr object in r

regression

r