if (FALSE) {
data <- iris
rec_obj <- hai_earth_data_prepper(data, Species ~ .)
auto_earth <- hai_auto_earth(
.data = data,
.rec_obj = rec_obj,
.best_metric = "f_meas",
.model_type = "classification"
)
auto_earth$recipe_info
}
Run the code above in your browser using DataLab