Remove border lines in ggplot map/choropleth

问题:

I would like to remove the lines between regions of a choropleth generated in ggplot. My question is motivated by a very large map with very very small regions (census block groups) that are so numerous that it's impossible to see the color filling the shape given the density of the borders. I'm using updated RStudio on a Mac with ggplot2 version 1.0.0; the same problem does not seem to occur on Windows.

Here are examples (using counties) that have different colors for each county so that the borders are not necessary. The first uses purple borders for emphasis. The second has color = NA which was my unsuccessful attempt to eliminate all borders.

library("ggplot2")
library("maps")
tn = map_data("county", region = "tennessee")
ggplot(tn, aes(x = long, y = lat, group = group)) + 
  geom_polygon(aes(fill = group), color = "purple")

ggplot(tn, aes(x = long, y = lat, group = group)) + 
  geom_polygon(aes(fill = group), color = NA)

回答1:

Another option is to set both fill and color equal to group, which worked on the macOS I tried it on:

library("ggplot2")
library("maps")
tn = map_data("county", region = "tennessee")
ggplot(tn, aes(x = long, y = lat, group = group)) + 
  geom_polygon(aes(fill = group, color = group))

Output:

回答2:

I can confirm it's specific to the Mac. Was just trying to do the same and 'colors=NA' has no visible effect in R Studio on a Mac, the borders still show. Just loaded the project on Windows and the borders are gone.

For reference, my set-up: Mac is running R Studio 0.98.1074 on Mac OS X 10_10_1 (Yosemite). Windows is running R Studio 0.98.1073 on Windows 7.

回答3:

Setting color = NA works for me:

ggplot(tn, aes(x = long, y = lat, group = group)) + 
    geom_polygon(aes(fill = group), color = NA) +
    coord_map()

produces this plot with no spaces between polygons.

I'm using ggplot2 version 1.0.0.

I added coord_map to give it the right aspect ratio. On my machine, that doesn't affect the borders, I'm not sure why borders are visible in your second post. Here's mine:

ggplot(tn, aes(x = long, y = lat, group = group)) + 
  geom_polygon(aes(fill = group), color = NA)