Running local-stability

To create this plot we just need to select the explanatory variable the variables argument of the function

id_rf_age <- predict_diagnostics(explainer = explain_rf,
                                 new_observation = henry,
                                 neighbours = 10,
                                 variables = "age")