Chart for identifying outliers
studres_chart(model)
lm
model <- lm(mpg ~ disp + hp + wt, data = mtcars) studres_chart(model)