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