Skip to content

Instantly share code, notes, and snippets.

@mcfrank
Created July 1, 2019 04:01
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mcfrank/07dcf42e0dc6594322f7397b24e48561 to your computer and use it in GitHub Desktop.
Save mcfrank/07dcf42e0dc6594322f7397b24e48561 to your computer and use it in GitHub Desktop.
iqs <- data_frame(iq = rnorm(mean = 100, sd = 15, n= 40),
school = c(rep("Stanford",20), rep("Berkeley",20)),
year = factor(rep(c(1950,1990),20)))
summary(lm(iq ~ school * year, data = iqs))
summary(lm(scale(iq) ~ school * year, data = iqs))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment