# NOT RUN {
if (require("randomForest")) {
data("Boston", package = "MASS")
rf = randomForest(medv ~ ., data = Boston, ntree = 50)
mod = Predictor$new(rf, data = Boston)
# Compute the individual conditional expectations for the first feature
ice = Ice$new(mod, feature = "crim")
# Plot the results directly
plot(ice)
}
# }
Run the code above in your browser using DataLab