if (FALSE) {
dummy_c2c(airquality, "Month")
data("occup_small", package = "cat2cat")
occup_old <- occup_small[occup_small$year == 2008, ]
dummy_c2c(occup_old, "code")
dummy_c2c(occup_old, "code", "knn")
}
Run the code above in your browser using DataLab