在心理包中提取主体函数的输出作为数据框
当我使用主函数时，就像下面的代码一样，我得到一个很好的表格，它给出了所有标准化的加载，还有一个表格，其中给出了特征值和比例和累积比例的解释。
rotatedpca <- principal(PCFdataset, nfactors = 8, rotate = "varimax", scores = T) 我想导出这个输出到一个Excel文件（使用WriteXLS），但我只能做到这一点的dataframe，并且rotatepca不是一个dataframe，不能被强迫成一个看起来。 我能够通过使用以下代码提取标准化的加载：
loadings<-as.data.frame(unclass(rotatedpca$loadings))
但我不知道如何访问通常显示的其他信息，当我简单地调用主函数，特别是特征值和比例和累计方差解释。 我尝试了rotatecpa $ values，但是它返回了所有12个原始variables的特征值，看起来像没有旋转的因素，我不明白。 而且我还没有想出任何方法来尝试提取方差解释值。 我怎样才能简单地创build一个数据框，看起来像我从主函数得到的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
感谢您阅读我的文章！
我刚刚添加了这个function到最新的（截至今天）释放精神1.3.10.11。 如果你也是
f3 <- fa(Thurstone,3) #or p3 <- principal(Thurstone,3) #then p <- print(f3) p # will give you p $Vaccounted MR1 MR2 MR3 SS loadings 2.6411150 1.8621522 1.4951831 Proportion Var 0.2934572 0.2069058 0.1661315 Cumulative Var 0.2934572 0.5003630 0.6664945 Proportion Explained 0.4402995 0.3104389 0.2492616 Proportion 0.4402995 0.7507384 1.0000000
一般来说，如果您对心理套餐有任何build议或疑问，如果您直接与我联系，您会得到更快的答案。
法案
为什么不这样做：
capture.output( print(rotatedpca), file="pc.txt")
您可以使用其“ Text to Columns...function从/ Data菜单中读取所需的部分到Excel中。 或者，您可以将其粘贴到打开的空白Excel文档中，然后select要转换的行。 使用可能会自动提供的“固定”选项。