# Load required packages and data
library(dplyr)
data(survey_data)
# Kendall's tau is O(n^2); the examples run on a subset for speed.
# On your own data, simply drop the subsetting.
mini_survey <- survey_data[1:300, ]
# Basic correlation between two variables
mini_survey %>%
kendall_tau(life_satisfaction, political_orientation)
# Correlation matrix for multiple variables
mini_survey %>%
kendall_tau(life_satisfaction, political_orientation, trust_media)
# Weighted correlations
mini_survey %>%
kendall_tau(age, income, weights = sampling_weight)
# Listwise deletion for missing data
mini_survey %>%
kendall_tau(age, income, use = "listwise")
# One-tailed test
mini_survey %>%
kendall_tau(age, income, alternative = "greater")
# \donttest{
# Grouped correlations
mini_survey %>%
group_by(region) %>%
kendall_tau(age, income, life_satisfaction)
# Using tidyselect helpers for ordinal variables
mini_survey %>%
kendall_tau(starts_with("trust"), weights = sampling_weight)
# --- Three-layer output ---
result <- mini_survey %>%
kendall_tau(life_satisfaction, political_orientation, trust_media,
weights = sampling_weight)
result # compact one-line overview
summary(result) # full correlation, p-value, and N matrices
summary(result, pvalue_matrix = FALSE) # hide p-values
# }
Run the code above in your browser using DataLab