3

我希望使用 RGoogleMaps 包的 GetMap 函数将 Google API 静态地图导入 R。然后我计划使用 PlotOnStaticMap 将数据点绘制到 R 中的图形上。我想使用“地形”地图类型，但不想要标签。我发现了一个先前的 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 是要在地图上绘制的经纬度坐标的数据文件

4

1 回答 1

4

Like this? 

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")
于 2014-01-22T23:13:40.363 回答