fit <- lm(mpg ~ cyl, data = mtcars)
plot_res_vs_linear_predictor(fit)
plot_res_vs_linear_predictor(fit, residual_fn = rstudent)
plot_res_vs_linear_predictor(fit, residual_fn = residuals)
glm_fit <- glm(cyl ~ mpg, family = poisson(), data = mtcars)
plot_res_vs_linear_predictor(glm_fit)
plot_res_vs_linear_predictor(glm_fit, type = "pearson")
Run the code above in your browser using DataLab