Factor Analysis in R
Jennifer Brussow
Psychometrician
Absolute fit statistics have intrinsic meaning and suggested cutoff values.
Relative fit statistics only have meaning when comparing models.
Commonly used cutoff values:
# Run the EFA with six factors (as indicated by your scree plot) EFA_model <- fa(bfi_EFA, nfactors = 6)
# View results from the model object EFA_model
The total number of observations was 1400 with Likelihood Chi Square = 618.43 with prob < 1.2e-53
Tucker Lewis Index of factoring reliability = 0.916 RMSEA index = 0.045 and the 90 % confidence intervals are 0.041 0.048
BIC = -576.87
# Run each theorized EFA on your dataset
bfi_theory <- fa(bfi_EFA, nfactors = 5)
bfi_eigen <- fa(bfi_EFA, nfactors = 6)
# Compare the BIC values bfi_theory$BIC bfi_eigen$BIC
bfi_theory$BIC bfi_eigen$BIC
-381.5326
-576.8658
Factor Analysis in R