if (requireNamespace("mlr3")) {
library(mlr3)
library(mlr3viz)
task = tsk("iris")
head(fortify(task))
autoplot(task)
autoplot(task$clone()$select(c("Sepal.Length", "Sepal.Width")),
type = "pairs")
autoplot(task, type = "duo")
}
Run the code above in your browser using DataLab