删除ggplot2 geom_polygon中的连接线

Question

我通过对从 www.gadm.org 下载的 shapefile 进行子集化来制作了下面的 map :

load(url('http://gadm.org/data/rda/GBR_adm0.RData'))
library(ggplot2)
ukMapFort <- fortify(gadm)
ukMapFortSub <- subset(ukMapFort, lat > 55.575 & lat < 55.739 & long > -1.929 & long < -1.7)
ggplot() + geom_polygon(data=data.frame(ukMapFortSub), aes(long, lat, group=id), fill=NA, color="black")

如何去掉两条红线？注意我使用 Photoshop 将线条染成红色 - 这些线条是由 R 代码生成的，但不是由 R 代码染成红色的。

Answer 1

如果您只需要绘制边框，则可以使用geom_path() 和group 来表示group=。在这种情况下，您还必须添加 coord_map() 以保持 x 轴和 y 轴之间正确的纵横比。

ggplot(ukMapFortSub,aes(long, lat, group=group))+
  geom_path(color="black")+coord_map()