0

我有以下带有因变量向量的 lm:

fit<-lm(cbind(X1m, X3m, X6m, X1y, X2y, X3y, X5y, X6y, X10y, 
                 X20y, X30y) ~ (ff + dc), data = yields)

尝试将整个输出导出到 csv 文件时,出现此错误:

write.csv(summary(fit),"fit.csv")
Error in as.data.frame.default(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors) :     
cannot coerce class ""listof"" to a data.frame

导出系数不会产生错误:

write.csv(coef(fit), "fit.csv")

但是,我希望在格式整齐的 csv 中包含 t 统计量和标准误差以及我的系数,以便复制到 word 文档、演示文稿等中。

我知道这个问题与因变量是一个列表(向量)这一事实有关。任何想法或建议将不胜感激。样本数据可以在这里找到。

4

1 回答 1

2

环绕capture.output()

write(capture.output(summary(fit)), "fit.txt")

当您评估 .txt 文件时,您将获得一个干净的 .txt 文件,其中包含 R 控制台中显示的所有内容summary(fit)。我不建议写入 .csv,但如果您坚持,请使用write.csv.

并且供您/未来的读者参考,如果您决定在函数中自动执行此过程,那么您需要包装 aeval(..., envir = .GlobalEnv)以摆脱打印/写入的那些烦人的环境标签。

于 2015-01-12T22:10:57.520 回答