library(dplyr)
library(tidyr)
library(tibble)
data <- data.frame(
cat_a = rep(letters[1:5], each = 4),
cat_b = rep(LETTERS[1:2], times = 10),
cat_c = sample(c("Var1", "Var2", "Var3"), 20, replace = TRUE)
)
perform_clustering(data, "cat_a", "cat_b", "cat_c")
Run the code above in your browser using DataLab