## Not run: ------------------------------------
# library(tigris)
# library(ggplot2)
# library(ggthemes)
#
# me <- counties("Maine", cb = TRUE)
# me_map <- fortify(me)
#
# gg <- ggplot()
# gg <- gg + geom_map(data=me_map, map=me_map,
# aes(x=long, y=lat, map_id=id),
# color="black", fill="white", size=0.25)
# gg <- gg + coord_map()
# gg <- gg + theme_map()
# gg
## ---------------------------------------------
Run the code above in your browser using DataLab