我使用套件RgoogleMaps
代替R.我已经绘制了我的地图,我需要使用points
命令添加点,但它不起作用。这是我的代码:
PlotOnStaticMap(Map, add = FALSE, TrueProj=F, FUN = points) # plot the background
# add external boundary
for (nb in 1:100)
{
points(x[nb],y[nb],type="l",lwd=3)
}
我该如何解决?
答案 0 :(得分:4)
我认为这是你正在寻找的东西:
lat = c(40.702147,40.718217,40.711614);
lon = c(-74.012318,-74.015794,-73.998284);
center = c(mean(lat), mean(lon));
zoom <- min(MaxZoom(range(lat), range(lon)));
Map <- GetMap(center=center, zoom=zoom,markers = paste0("&markers=color:blue|label:S|",
"40.702147,-74.015794&markers=color:green|label:G|40.711614,-74.012318&markers=",
"color:red|color:red|label:C|40.718217,-73.998284"), destfile = "MyTile1.png");
tmp <- PlotOnStaticMap(Map, lat = c(40.702147,40.711614,40.718217),
lon = c(-74.015794,-74.012318,-73.998284),
destfile = "MyTile1.png", cex=1.5,pch=20,
col=c('red', 'blue', 'green'), add=FALSE);
# Now let's add points with the points method:
PlotOnStaticMap(Map, lat = c(40.702147,40.711614,40.718217),
lon = c(-74.015794,-74.012318,-73.998284),
lwd=1.5,col=c('red', 'blue', 'green'), points(x = 40.702148, y = NULL ), add=TRUE)
请参阅points()
中的PlotOnStaticMap
语法?