library(moderndive)
# Fit regression model:
mpg_model <- lm(mpg ~ hp, data = mtcars)
# Regression tables:
get_regression_table(mpg_model)
# Information on each point in a regression:
get_regression_points(mpg_model)
# Regression summaries
get_regression_summaries(mpg_model)
# Plotting parallel slopes models
library(ggplot2)
ggplot(evals, aes(x = age, y = score, color = ethnicity)) +
geom_point() +
geom_parallel_slopes(se = FALSE)
Run the code above in your browser using DataLab