将Terrain类型的Google API静态地图导入到没有标签的R中

时间:2014-01-22 22:27:03

标签: r api google-maps rgooglemaps

我希望使用RGoogleMaps包的GetMap功能将Google API静态地图导入到R中。然后我计划使用PlotOnStaticMap将数据点绘制到R中的图形上。我想使用“terrain”maptype,但不希望它上面有标签。我找到了一个先前的stackoverflow问题,该问题解决了如何使用“style = feature:all | element:labels | visibility:off”删除地图上的标签。

使用标签制作地图http://maps.googleapis.com/maps/api/staticmap?center=29.4,-89.2&zoom=9&size=600x500&maptype=terrain&sensor=false

没有标签的地图:http://maps.googleapis.com/maps/api/staticmap?center=29.4,-89.2&zoom=9&size=600x500&maptype=terrain&sensor=false&style=feature:all|element:labels|visibility:off

这第二个代码生成我想要的精确地图。但是,当我将其保存为PNG文件然后使用GetMaps函数将其导入R时,它会为我提供原始地图,其中所有标签仍然附加。

有没有人知道如何在没有标签正确导入R的情况下获取地图?看起来应该不那么难,但我无法找到解决方案。

谢谢!

R中的代码:

smap<-read.table("D:/sediment/Rfiles/smap.txt", header=TRUE, sep= "");
library(RgoogleMaps)
library(rgdal)
MyMap <- GetMap(center=c(29.4, -89.2), zoom=9, 
                destfile = "D:/sediment/Rfiles/map.png", maptype="terrain")
map<-PlotOnStaticMap(MyMap, lat=smap$lat, lon=smap$lon, 
                     col=c('black'), add=F,cex=1.1,pch=19)

* smap是要在地图上绘制的lat,lon坐标的数据文件

1 个答案:

答案 0 :(得分:4)

喜欢这个?

MyMap <- GetMap(center=c(29.4, -89.2), zoom=9, 
                destfile = "D:/sediment/Rfiles/map.png", maptype="terrain",
                path = "&style=feature:all|element:labels|visibility:off")