Add points to RgoogleMaps plot

3.3k views Asked by At

I'm using the package RgoogleMaps for R. I've plotted my map, and i need to add points with points command, but it doesn't work. Here's my code:

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)
}

How could I fix it?

1

There are 1 answers

4
Hack-R On BEST ANSWER

I think this is what you're looking for:

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)

See the syntax for points() within PlotOnStaticMap?