我有:
> df1
lon lat grp
1 0.02310676 51.39729 0
2 -0.04666115 51.40614 0
3 0.09730595 51.38398 0
4 0.02458385 51.39580 1
并想将其绘制在地图上。
library(RgoogleMaps)
> center
[1] 51.389486 0.036657
mm=GetMap(center=center,zoom=10,maptype= "roadmap", destfile = "satellite.png")
PlotOnStaticMap(mm,lat=df1$lat,lon=df1$lon,pch=20,col=df1$grp, cex=2.3)
结果是 3 个正确放置的标记,缺少的标记是具有负值的标记。
进一步检查:
PlotOnStaticMap(mm,lat=51.40614,lon=0.04666115,pch=20,col=c('red','dark blue'), cex=2.3)
PlotOnStaticMap(mm,lat=51.40614,lon=-0.04666115,pch=20,col=c('red','dark blue'), cex=2.3)
非常感谢任何关于如何在西半球包含点的建议!