require(magrittr)
require(dplyr)
data(example_data)
# encode one variable
encode_cats(example_data, marital_status) %>%
select(starts_with("marital_status"))
# encode multiple variables
encoded <- encode_cats(example_data, diabetes, marital_status)
select(encoded, starts_with("marital_status"))
# diabetes_type included below but was not modified:
select(encoded, starts_with("diabetes"))
Run the code above in your browser using DataLab