result <- efa(survey_data, political_orientation, environmental_concern,
life_satisfaction, trust_government, trust_media, trust_science)
summary(result) # all sections
summary(result, communalities = FALSE) # hide communalities
Run the code above in your browser using DataLab