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