result <- friedman_test(survey_data, trust_government, trust_media,
trust_science) |> pairwise_wilcoxon()
summary(result) # all sections
summary(result, comparisons = FALSE) # hide comparison tables
Run the code above in your browser using DataLab