Used by plot_model_performance()
.
Arguments
- performance_df
dataframe of performance results from multiple calls to
run_ml()
Examples
if (FALSE) {
# call `run_ml()` multiple times with different seeds
results_lst <- lapply(seq(100, 104), function(seed) {
run_ml(otu_small, "glmnet", seed = seed)
})
# extract and combine the performance results
perf_df <- lapply(results_lst, function(result) {
result[["performance"]]
}) %>%
dplyr::bind_rows()
# make it pretty!
tidy_perf_data(perf_df)
}