Here is the recipe without imputation. division and super_department are categorical variables.
preproc = recipe(
cpc ~ .,
data = lag_df) %>%
step_integer(division, super_department) %>%
step_normalize(recipes::all_predictors(), -division, -super_department) %>%
step_zv(recipes::all_predictors()) %>%
prep()
rf = rand_forest() %>%
set_mode("regression") %>%
set_engine("ranger", num.threads = 30, importance = "impurity")
wflow <-
workflow() %>%
add_recipe(preproc) %>%
add_model(rf)