library(magrittr)
# create factor with codelist attribute
classified(c('knife','fork','spoon'))
# give back a simple numeric
classified(c('knife','fork','spoon')) %>% as.numeric
# intentionally preserve levels as 'guide' attribute
classified(c('knife','fork','spoon')) %>% as.integer
# implement offset
classified(c('knife','fork','spoon')) %>% as.integer(-1)
# globally defeat the 'persistence' paradigm
options(yamlet_persistence = FALSE)
c('knife','fork','spoon') %>% 
  classified %>%
  as.integer %>% 
  class # integer
  
# remove option to restore default persistence paradigm
options(yamlet_persistence = NULL)
c('knife','fork','spoon') %>% 
  classified %>%
  as.integer %>% 
  class # dvec
  
# locally defeat persistence paradigm
c('knife','fork','spoon') %>% 
  classified %>%
  as.integer(persistence = FALSE) %>% 
  class # integer
  
Run the code above in your browser using DataLab