# We train a tree on the Boston dataset:
if (FALSE) {
library("rpart")
data("Boston", package = "MASS")
rf <- rpart(medv ~ ., data = Boston)
mod <- Predictor$new(rf, data = Boston)
# Compute the interactions
ia <- Interaction$new(mod)
# Plot the results directly
plot(ia)
}
Run the code above in your browser using DataLab