0

在主成分分析之后,我试图让我的原始相关矩阵的变量以与(排序的)负载矩阵相同的方式排序(如 print.psych 所示)。我使用了 psych 包中的以下功能,但我无法让两者对齐。

pc <- principal(myCorrMatrix$correlations, nfactors=15, n.obs=49, rotate="oblimin")
print.psych(pc, cut=0.3, sort=TRUE)

sortedPC <- fa.sort(pc)
sortedMatrix <- mat.sort(myCorrMatrix$correlations, sortedPC)

我不是 100% 确定 mat.sort 的第二个参数应该是什么,但我尝试了 sortedPC 的几个元素都无济于事。任何指针将不胜感激!

4

1 回答 1

0

不要fa.sort()传给mat.sort(). mat.sort()需要一个 fa 对象,其中包含 $loadings。请注意,这principal()也给出了结果对象中的 $loadings。我认为这应该有效:

sortedMatrix <- mat.sort(myCorrMatrix$correlations, pc)

这是一个例子:

data(Bechtoldt.1)
sorted <- mat.sort(Bechtoldt.1,principal(Bechtoldt.1,5))
cor.plot(sorted)
于 2014-04-24T22:53:57.970 回答