Skip to content

Instantly share code, notes, and snippets.

@ryanburge

ryanburge/lucy_example.R

Last active March 22, 2023 20:33
Show Gist options
  • Save ryanburge/2290f51e6c6258aa5c5426025799c688 to your computer and use it in GitHub Desktop.
Save ryanburge/2290f51e6c6258aa5c5426025799c688 to your computer and use it in GitHub Desktop.
Download ZIP
Lucy Example
Raw
lucy_example.R
coef_names <- c("Education" = "educ",
"Age" = "age",
"Male" = "male",
"Income" = "inc",
"White" = "white",
"Attendance" = "att",
"South" = "south",
"Immigrant/First Gen." = "imm",
"Political Liberal" = "con")
prot <- plot_summs(reg1, scale = TRUE, robust = "HC3", coefs = coef_names)
prot +
labs(x = "Coefficient Estimate", y = "", subtitle = "Protestants", title = "Predicting a Vote for Donald Trump Among Latinos")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment