Evaluar
Ha llegado el momento de ponerlo a prueba. Ajusta tu modelo para encontrar el valor óptimo de penalización y entrena un modelo final para evaluar tu trabajo.
Tu workflow, la rejilla de penalización y la función definida por el usuario class_evaluate() están disponibles en tu entorno.
Este ejercicio forma parte del curso
Ingeniería de características en R
Instrucciones del ejercicio
- Configura un
tune_gridpara explorar el rendimiento de tu modelo con respecto a ROC_AUC. - Selecciona el mejor valor de penalización.
- Ajusta el workflow final con la mejor penalización.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
# Set up a tune grid to explore your model performance against roc_auc
lr_tune_output <- ___(lr_workflow, resamples = vfold_cv(train, v = 5),
metrics = metric_set(roc_auc), grid = lr_penalty_grid)
# Select the best penalty value
best_penalty <- ___(lr_tune_output, metric = 'roc_auc', desc(penalty))
# Fit the final workflow with the best penalty
lr_final_fit<- ___(lr_workflow, best_penalty) %>% fit(data = train)
lr_final_fit %>% augment(test) %>%
class_evaluate(truth = Attrition, estimate = .pred_class, .pred_Yes)