9.1 Update formula
all_wf <- bb_wf %>%
workflows::update_formula(Sale_Price ~ .)
all_wf %>%
tune::last_fit(ames_split) %>%
tune::collect_metrics()
## ! Resample1: model (predictions): prediction from a rank-deficient fit may be misleading
## # A tibble: 2 x 3
## .metric .estimator .estimate
## <chr> <chr> <dbl>
## 1 rmse standard 38981.
## 2 rsq standard 0.758