Fitting, augmenting, और assessing

# Fit the workflow to the training set
lr_fit_glm <- lr_workflow_glm %>%
  ___(train)

# Augment the fit using the test split
lr_aug_glm <- lr_fit_glm %>%
  ___(test)

# Assess the model
glm_metrics <- lr_aug_glm %>%
  class_evaluate(truth = ___,
                 estimate = .pred_class,
                 .pred_Yes)

glm_metrics