if (FALSE) { # interactive()
model <- train(mtcars[, c("wt", "mpg")],
hyperparameters = setup_GLM(),
outer_resampling_config = setup_KFold(n_resamples = 3L),
execution_config = setup_SerialExecution(),
verbosity = 0L
)
plot_metric(model)
}
Run the code above in your browser using DataLab