r - 组合多个 ggplot2 多边形/路径

Question

我正在使用 ggplot2 创建县级数据的等值线图。我想强调多县地区。覆盖县 map 数据子集的路径或多边形非常简单，但这会留下“内部”路径线。有没有办法将这些区域组合成一个组或简单地隐藏内部线？

require(ggplot2)
require(maps)
require(maptools)

va <- map_data("county", region="virginia")

ggplot(va, aes(long, lat)) + coord_map() + 
  geom_polygon(aes(group=group)) +
  geom_path(data=subset(va, subregion %in% c("patrick", "henry", "franklin",
    "pittsylvania")), aes(group=group), size=1, color="white")

http://i.imgur.com/cRzqX.png

编辑:上面的例子并不是我想要做的。下面的代码更能代表实际项目。实际 map 将比这更详细，因为它们使用人口普查区级别数据并在顶部有地理编码点。

va <- map_data("county", region="virginia")
cty <- data.frame(subregion=unique(va$subregion))
cty$stat <- sample.int(nrow(cty))
va <- merge(va, cty, by="subregion")

p <- ggplot(va, aes(long, lat)) + coord_map() + 
  geom_polygon(aes(group=group, fill=stat), color="grey") +
  geom_path(data=subset(va, subregion %in% c("patrick", "henry", "franklin",
    "pittsylvania")), aes(group=group), size=1, color="white")

Answer 1

如果我没看错，您只需将 geom_path 换成 geom_polygon 即可绘制无内线的图形:

ggplot(va, aes(long, lat)) + coord_map() + geom_polygon(aes(group=group)) + 
   geom_polygon(data=subset(va, subregion %in% c("patrick", "henry", "franklin",
   "pittsylvania")), aes(group=group), size=1, color="white",fill="white")