建立 CFA

R 中的因素分析

Jennifer Brussow

Psychometrician

為什麼要做驗證式分析？

驗證式分析的優點：

明確指定變數／因素關係
事先檢驗既有理論
開發新量表時，這是最適合發表的分析！

EFA 結果的路徑圖

使用包裝函式設定 CFA

EFA_syn <- structure.sem(EFA_model)

EFA_syn

      Path        Parameter Value
 [1,] "MR5->A1"   "F4A1"    NA   
 [2,] "MR5->A2"   "F4A2"    NA   
 [3,] "MR5->A3"   "F4A3"    NA   
 [4,] "MR5->A4"   "F4A4"    NA   
 [5,] "MR5->A5"   "F4A5"    NA   
 [6,] "MR3->C1"   "F3C1"    NA   
 [7,] "MR3->C2"   "F3C2"    NA   
 [8,] "MR3->C3"   "F3C3"    NA   
 [9,] "MR3->C4"   "F3C4"    NA   
[10,] "MR3->C5"   "F3C5"    NA   
[11,] "MR1->E1"   "F2E1"    NA   
...

包裝函式產生的語法

EFA_syn

      Path        Parameter Value
 [1,] "MR5->A1"   "F4A1"    NA

第 4 因素（F4）＝ EFA 的 MR5 因素
受試者的因素程度可預測作答反應
包裝函式會自動命名參數
NA 值＝隨機指定的起始值

依理論建立 CFA 語法

# Set up syntax specifying which items load onto each factor
theory_syn_eq <- "
AGE: A1, A2, A3, A4, A5     #Agreeableness
CON: C1, C2, C3, C4, C5     #Conscientiousness
EXT: E1, E2, E3, E4, E5     #Extraversion
NEU: N1, N2, N3, N4, N5     #Neuroticism
OPE: O1, O2, O3, O4, O5     #Openness
"

因素名稱簡短好記
因素名稱後接冒號
題項以逗號分隔列出

theory_syn <- cfa(text = theory_syn_eq, reference.indicators = FALSE)

一起來練習吧！

R 中的因素分析