data(biomass, package = "modeldata")
biomass_rec <- recipe(HHV ~ ., data = biomass) %>%
step_rm(sample, dataset) %>%
check_cols(contains("gen")) %>%
step_center(all_numeric_predictors())
if (FALSE) {
bake(biomass_rec, biomass[, c("carbon", "HHV")])
}
Run the code above in your browser using DataLab