因子分析 - 行ごとにスコアを割り当てる

Question

私はfaを用いて因子分析を行い、8つの因子を得ました（私は5つしか使用しませんが、SS負荷が1を超えるものを使用します）。 （私の調査の回答者）が元のデータセットの各要素のスコアを返します。

スコアはどこに保存されていますか？ 5つの新しい列を作成し、それぞれに因子スコアを割り当てるにはどうすればよいですか？

CorrMatrixは、元のデータセットが私がしたいものを2994件の回答一件の回答各行

item1 item2 item3 ... item30 1 3 5 ... 4 3 4 2 ... 5

をカウントしているアイテムの相関行列（30×30行列）

fa.varimax<-fa(CorrMatrix,nfactors = 8,rotate = "varimax",fm="pa") 

あります元のデータセットの最後に5つの新しい列を追加する

factor1 factor2 factor3 factor4 factor5 
score1i score2i score3i score4i score5i 
score1j score2j score3j score4j score5j 

2994回答者全員

Answer 1

psychライブラリを質問としていたとします。 SS負荷は因子分析に直接記憶されないが、計算することができる。

library(psych) 

fa.loadings <- colSums(fa.varimax$loadings^2) # calculate factor loading 
fa.loadings <- fa.loadings[fa.loadings > 1] # filter factor loading 

参考：https://web.stanford.edu/class/psych253/tutorials/FactorAnalysis.html