我正在caracal's great example对二分类数据进行因子分析,我现在正在努力从psych
包的fa.poly
函数生成的对象中提取因子。< / p>
任何人都可以帮助我从fa.poly
对象中提取因子(并查看相关性)吗?
请参阅caracal's example了解工作示例。
答案 0 :(得分:2)
在此示例中,您将创建一个对象:
faPCdirect <- fa.poly(XdiNum, nfactors=2, rotate="varimax") # polychoric FA
所以在faPCdirect的某个地方有你想要的东西。我建议使用str()
检查faPCdirect
> str(faPCdirect)
List of 5
$ fa :List of 34
..$ residual : num [1:6, 1:6] 4.79e-01 7.78e-02 -2.97e-0...
.. ..- attr(*, "dimnames")=List of 2
.. .. ..$ : chr [1:6] "X1" "X2" "X3" "X4" ...
.. .. ..$ : chr [1:6] "X1" "X2" "X3" "X4" ...
..$ dof : num 4
..$ fit
...skip stuff....
..$ BIC : num 4.11
..$ r.scores : num [1:2, 1:2] 1 0.0508 0.0508 1
.. ..- attr(*, "dimnames")=List of 2
.. .. ..$ : chr [1:2] "MR2" "MR1"
.. .. ..$ : chr [1:2] "MR2" "MR1"
..$ R2 : Named num [1:2] 0.709 0.989
.. ..- attr(*, "names")= chr [1:2] "MR2" "MR1"
..$ valid : num [1:2] 0.819 0.987
..$ score.cor : num [1:2, 1:2] 1 0.212 0.212 1
因此,这表示此对象是五个列表,第一个元素名为fa
,并且包含一个名为score.cor
的元素,它是一个2x2矩阵。我想你想要的是偏离对角线。
> faPCdirect$fa$score.cor
[,1] [,2]
[1,] 1.0000000 0.2117457
[2,] 0.2117457 1.0000000