# NOT RUN {
library(magrittr)
classified(c('knife','fork','spoon'))
classified(c('knife','fork','spoon')) %>% as.numeric
classified(c('knife','fork','spoon')) %>% as.integer
classified(c('knife','fork','spoon')) %>% as.integer(-1)
# }
Run the code above in your browser using DataLab