# NOT RUN {
# load example data
testData <- january2018
# apply categories
testData <- cs_crime_cat(testData,var = crime, newVar = crimeCat, output = "numeric")
# preview categories
table(testData$crimeCat)
# apply categories
testData <- cs_crime_cat(testData,var = crime, newVar = crimeCat, output = "factor")
# preview categories
table(testData$crimeCat)
# apply categories
testData <- cs_crime_cat(testData,var = crime, newVar = crimeCat, output = "string")
# preview categories
table(testData$crimeCat)
# }
Run the code above in your browser using DataLab