result <- reliability(survey_data, trust_government, trust_media, trust_science)
summary(result) # all sections
summary(result, inter_item_correlations = FALSE) # hide correlations
Run the code above in your browser using DataLab