Skip to content

Instantly share code, notes, and snippets.

@hcozart
Created April 29, 2016 15:26
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/1265d961a481661adeb4b587a60ef236 to your computer and use it in GitHub Desktop.
Save hcozart/1265d961a481661adeb4b587a60ef236 to your computer and use it in GitHub Desktop.
filter(NYC_Death2, Cause.of.Death %in% TOP)%>%
ggplot(data = ., aes(x= Year,y=Count)) +
geom_bar(aes(fill = reorder(Cause.of.Death,Count)), position ="dodge",
stat = "identity") +
ggtitle("Top Ten Causes of Death by Year") +
ylab(label = "Deaths" )+
scale_fill_discrete(name = "Cause of Death")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment