# NOT RUN {
# Load messy_adult
data("messy_adult")
# we wil change education
messy_adult <- setColAsFactor(messy_adult, cols = "education")
sapply(messy_adult[, .(education)], class)
# education is now a factor
# }
Run the code above in your browser using DataLab