Skip to content

Instantly share code, notes, and snippets.

@hilaryparker
Created April 12, 2015 23:58
Show Gist options
  • Save hilaryparker/046f55f5222b12692d74 to your computer and use it in GitHub Desktop.
Save hilaryparker/046f55f5222b12692d74 to your computer and use it in GitHub Desktop.
make a quick Hilary/Hillary graph
library(babynames)
library(dplyr)
library(ggplot2)
babynames <- babynames %>% tbl_df()
babynames %>%
filter(name == "Hilary" | name == "Hillary") %>%
filter(year >= 1950, sex == "F") %>%
ggplot(aes(x = year, y = prop, group = name, color = name)) + geom_line()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment