# NOT RUN {
library(tigris)
library(ggplot2)
library(ggthemes)
roads <- roads("Maine", "031")
gg <- ggplot()
gg <- gg + geom_sf(data = roads,
color="black", fill="white", size=0.25)
gg <- gg + theme_map()
gg
# }
Run the code above in your browser using DataLab