我正在尝试根据psych软件包的建议(psych-manual.pdf,p。25)使用omega()进行探索性双因素分析,并希望获得因子得分。
但是,与fa()中的常规因子分析不同,将omega()的输出作为参数传递给factor.scores(...,f =,...)不会自动提取加载矩阵并进行计算因素得分,但返回错误
图书馆(心理);库(GPArotation)
bfi.pa <-fa(bfi,5)
thur.om <-欧米茄(瑟斯顿,3)
thur.bf <-fa(Thurstone,3,rotate =“ biquartimin”)
bfi.pa.scores <-factor.scores(x = bfi,f = bfi.pa $ loadings,method =“ tenBerge”)
thur.om.scores <-factor.scores(x =瑟斯顿,f = thur.om,归因=“无”)
thur.bf.scores <-factor.scores(x = Thurstone,f = thur.bf,impute =“ none”)