当我使用主函数时,就像在下面的代码中一样,我得到一个很好的表格,它给出了所有标准化的加载,以及一个表格,其中包含特征值以及比例和累积比例.
rotatedpca <- principal(PCFdataset, nfactors = 8, rotate = "varimax", scores = T)
我想将此输出导出到excel文件(使用WriteXLS),但我只能对数据帧执行此操作,而rotatepca不是数据帧,并且不能强制转换为它看起来的数据帧.我可以使用以下代码提取标准化加载:
loadings<-as.data.frame(unclass(rotatedpca$loadings))
但我无法弄清楚当我简单地调用主函数时,如何访问通常显示的其他信息,特别是特征值以及解释的比例和累积方差.我尝试了rotatecpa $值,但是返回看起来像所有12个原始变量的特征值作为没有旋转的因子,我不明白.而且我甚至无法找出任何方法来尝试提取方差解释值.我怎样才能简单地创建一个看起来像我从主函数得到的R输出的数据帧？
RC2 RC3 RC8 RC1 RC4 RC5 RC6 RC7
SS loadings 1.52 1.50 1.45 1.44 1.01 1.00 0.99 0.98
Proportion Var 0.13 0.12 0.12 0.12 0.08 0.08 0.08 0.08
Cumulative Var 0.13 0.25 0.37 0.49 0.58 0.66 0.74 0.82
Proportion Explained 0.15 0.15 0.15 0.15 0.10 0.10 0.10 0.10
Cumulative Proportion 0.15 0.31 0.45 0.60 0.70 0.80 0.90 1.00
感谢您阅读我的帖子!