# Use a small sample for faster runtime
pq_data_small <- dplyr::slice_sample(pq_data, prop = 0.1)
create_rank_combine(
data = pq_data_small,
metric = "Email_hours",
hrvar = c("Organization", "FunctionType", "LevelDesignation")
)
Run the code above in your browser using DataLab