我有以下带有因变量向量的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文档，演示文稿等。
我知道这个问题与因变量是一个列表（向量）这一事实有关。任何想法或建议将不胜感激。可以找到样本数据here。
答案 0 :(得分：2)
在其周围包裹capture.output()
write(capture.output(summary(fit)), "fit.txt")
评估summary(fit)时，您将获得一个干净的.txt文件，其中包含R控制台中显示的所有内容。我不建议写入.csv，但如果你坚持，请使用write.csv.
对于您/未来读者的参考，如果您决定在一个函数中自动执行此过程，那么您需要包装eval(..., envir = .GlobalEnv)以摆脱那些令人讨厌的环境标记被打印/写入。