# NOT RUN {
df = data.frame(tasks = rep(c("A", "B"), each = 5),
learners = paste0("L", 1:5),
RMSE = runif(10), MAE = runif(10))
as.BenchmarkAggr(df, task_id = "tasks", learner_id = "learners")
if (requireNamespaces(c("mlr3", "rpart"))) {
library(mlr3)
task = tsks(c("boston_housing", "mtcars"))
learns = lrns(c("regr.featureless", "regr.rpart"))
bm = benchmark(benchmark_grid(task, learns, rsmp("cv", folds = 2)))
# default measure
as.BenchmarkAggr(bm)
# change measure
as.BenchmarkAggr(bm, measures = msr("regr.rmse"))
}
# }
Run the code above in your browser using DataLab