luc*_*ano 6 r polygon map ggplot2
我通过对从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")
Run Code Online (Sandbox Code Playgroud)
如何删除两条红线?注意我已经使用Photoshop将线条着色为红色 - 这些线条是由R代码生成的,但R代码不会将其涂成红色.
Did*_*rts 10
如果你需要绘制边界只是那么你可以使用geom_path()
和列group
进行group=
.coord_map()
在这种情况下,您还必须添加以保持x和y轴之间的正确纵横比.
ggplot(ukMapFortSub,aes(long, lat, group=group))+
geom_path(color="black")+coord_map()
Run Code Online (Sandbox Code Playgroud)
归档时间: |
|
查看次数: |
2030 次 |
最近记录: |