Map 1
tm_shape(indiana) +
tm_polygons(col = "winner12", title = "Political Party", labels = c("Democrat", "Republican"), palette= c("blue", "red")) +
tm_layout(inner.margins = c(0.1,0.15,0.075, 0.2), main.title = "Election Results", main.title.size = 1.25, legend.outside = TRUE) +
tm_compass(position = c("right", 0.09)) +
tm_scale_bar(position = c("right", 0.002)) +
tm_credits("US Census", position = c("left", 0.01), size = 0.7)
Map 2
tm_shape(indiana) +
tm_polygons(col = "med_income", title = "Median Income", palette= get_brewer_pal(palette = "Blues", plot = FALSE)) +
tm_layout(inner.margins = c(0.1,0.15,0.075, 0.2), main.title = "Median Income", main.title.size = 1.5, legend.outside = TRUE) +
tm_compass(position = c("right", 0.1)) +
tm_scale_bar(position = c("right", 0.02)) +
tm_credits("US Census", position = c("left", 0.01), size = .7)
Map 3
tm_shape(counties) +
tm_polygons(col = "POP2000", title = "Population in 2000", palette= get_brewer_pal(palette = "Greens", plot = FALSE)) +
tm_shape(hwy) +
tm_lines(col = "red", lwd = 2) +
tm_shape(rivers) +
tm_lines(col = "blue", lwd = 1.5) +
tm_shape(towns) +
tm_bubbles(size="POPULATION", title.size = "Population of Towns", col = "black") +
tm_layout(inner.margins = c(0.1, 0.05 ,0.075, 0.2), main.title = "WV Population Data", main.title.size = 1.5, main.title.position = "center") +
tm_compass(position = c(0.5, 0.15)) +
tm_scale_bar(position = c(0.3, 0.02), size = .6)
Map 4
tm_shape(lc) +
tm_raster(style = "cat", title = "Land Cover", labels = c("Water", "Developed", "Forest", "Other"), palette= c("deepskyblue", "brown2", "darkgreen", "tan")) +
tm_shape(ny_counties) +
tm_borders(col = "black", lwd = 2) +
tm_layout(inner.margins = c(0.05, 0.05 ,0.05, 0.15), legend.position = c("right", 0.1), main.title = "Land Cover", main.title.size = 1.5, main.title.position = "center") +
tm_compass(position = c(0.1, 0.03), size = 1.75) +
tm_scale_bar(position = c(0.25, 0.02), size = .7) +
tm_credits("National Land Cover Dataset (NLCD)", size = .5, position = c("right", 0.01))
