Building a model stack

library(ggplot2)
ggplot(mtcars, aes(mpg, disp)) +
  geom_point()