This is going to show some dotplots for education and poverty at the state level.

# Load your libraries here

library('lehmansociology')
library('ggplot2')
# Dot plots
ggplot(poverty.states, aes(x = PCTPOVALL_2013)) + geom_dotplot(binwidth = 1, method="histodot") +
      scale_y_continuous(NULL, breaks = NULL)

ggplot(education.states, aes(x = Percent.of.adults.with.less.than.a.high.school.diploma..2009.2013)) +
    geom_dotplot(binwidth = 1, method="histodot") +
    scale_y_continuous(NULL, breaks = NULL)

ggplot(education.states, aes(x = Percent.of.adults.with.a.bachelor.s.degree.or.higher..2009.2013)) +
  geom_dotplot(binwidth = 1, method="histodot") +
  scale_y_continuous(NULL, breaks = NULL)

states<-merge(education.states, poverty.states, by.x = 'FIPS.Code', by.y = 'FIPStxt')


elinw/lehmansociology documentation built on May 16, 2019, 3 a.m.