r - 如何将 princomp 结果打印、写入或导出到 csv 文件

Question

使用 princomp，结果不会存储为数据帧，例如，运行“summary(module_LS9)”在控制台中显示为表格。创建 csv 文件或任何可以在 Excel 或 Word 中格式化输出的表格的代码是什么？

我试过了：

• 接收器（“summary_module_LS9.csv”）
• 摘要（module_LS9）
• 下沉（）

这确实创建了一个 csv 文件，但这些值没有用逗号分隔。

也试过：

write.table(summary(module_LS9), file = "module_LS9_sum.csv", sep = ",", quote = FALSE, row.names = F)

得到：

Error in as.data.frame.default(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors) : 
  cannot coerce class ‘"summary.princomp"’ to a data.frame

感谢您的帮助！

标签： rcsv

Answer 1

我找不到保存摘要的方法，但是您可以获得保存 csv 文件的同一张表

comp<-princomp(base,cor=T)
var<-comp$sdev^2
write.csv(var,file="variance.csv")

然后转到csv文件，直接在excel中计算剩下的，就是estandar偏差，每个方差的比例，以及累积的比例。