# NOT RUN {
task = tsk("iris")
learner = lrn("classif.rpart")
resampling = rsmp("cv", folds = 2)$instantiate(task)
iterations = seq_len(resampling$iters)
# manually train two learners.
# store learners and predictions
learners = list()
predictions = list()
for (i in iterations) {
l = learner$clone(deep = TRUE)
learners[[i]] = l$train(task, row_ids = resampling$train_set(i))
predictions[[i]] = l$predict(task, row_ids = resampling$test_set(i))
}
rdata = as_result_data(task, learners, resampling, iterations, predictions)
ResampleResult$new(rdata)
# }
Run the code above in your browser using DataLab