Skip to content

Instantly share code, notes, and snippets.

@hcozart
Created April 29, 2016 15:27
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 hcozart/a2c478dae0de09e2eaee39b4acf917d1 to your computer and use it in GitHub Desktop.
Save hcozart/a2c478dae0de09e2eaee39b4acf917d1 to your computer and use it in GitHub Desktop.
filter(NYC_Death2, Cause.of.Death == "Heart Diseases")%>%
ggplot(data = ., aes(x= Year,y=Count)) +
geom_bar(aes(fill = Ethnicity), position ="dodge",stat = "identity")+
facet_wrap( ~ Sex)+
ggtitle("Heart Disease by Ethnicity and Sex") +
ylab(label = "Deaths" )+ scale_fill_brewer(palette = "Set1")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment