# model
model <- lm(mpg ~ disp + hp + wt, data = mtcars)
# residual fit spread plot
ols_plot_resid_fit_spread(model)
# fit mean plot
ols_plot_fm(model)
# residual spread plot
ols_plot_resid_spread(model)
Run the code above in your browser using DataLab