if (requireNamespace("mlr3")) {
library(mlr3)
library(mlr3viz)
task = tsk("boston_housing")
learner = lrn("regr.rpart")
object = learner$train(task)$predict(task)
head(fortify(object))
autoplot(object)
autoplot(object, type = "histogram", binwidth = 1)
autoplot(object, type = "residual")
if (requireNamespace("mlr3learners")) {
library(mlr3learners)
learner = lrn("regr.ranger", predict_type = "se")
object = learner$train(task)$predict(task)
autoplot(object, type = "confidence")
}
}
Run the code above in your browser using DataLab