This object has the results when a bagged regression tree was resampled using 10-fold cross-validation.
Details
The code used to produce this object:
library(tidymodels)
library(baguette)
tidymodels_prefer()
# ------------------------------------------------------------------------------
ctrl_rs <- control_resamples(save_pred = TRUE)
# ------------------------------------------------------------------------------
set.seed(1)
cars_rs <- vfold_cv(mtcars)
cars_bag_vfld <-
bag_tree() %>%
set_engine("rpart", times = 5) %>%
set_mode("regression") %>%
fit_resamples(
mpg ~ .,
resamples = cars_rs,
control = ctrl_rs
)