ggplot(heightweight,aes(x=weightLb,color=sex,fill=sex))+geom_histogram()
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.