result <- friedman_test(survey_data, trust_government, trust_media,
trust_science) |> pairwise_wilcoxon()
result # compact overview
summary(result) # full comparison tables
Run the code above in your browser using DataLab