7

我通过子集从 www.gadm.org 下载的 shapefile 制作了下面的地图:

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 代码染成红色的。

4

1 回答 1

11

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

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

在此处输入图像描述

于 2013-06-18T13:22:33.400 回答