library(ggplot2)
ggplot(age_at_mar, mapping = aes(x = age)) +
geom_histogram(binwidth = 3) +
labs(
x = "Age", y = "Count", title = "Age at first marriage, US Women",
subtitle = "Source: National Survey of Family Growth Survey, 2006 - 2010"
)
Run the code above in your browser using DataLab