2016-04-01 21 views
1

我試圖用ggmap在地圖上繪製點,但我不知道如何從一個地圖ggmap:從谷歌的地形圖

library(ggmap) 
library(mapproj) 
map <- get_map(location = 'middle east', zoom = 4) 
read.table("latlon.txt", header = TRUE) -> tbl 
plot<-ggmap(map) + geom_point(aes(x = lon, y = lat), color=tbl$color, size=3, data = tbl) + theme(legend.position = "none")+ 
    #geom_text(aes(label=pop),data=tbl,hjust=0, vjust=0) 
    ggsave(plot=plot,height=7.5,width=11, filename="f4 map.pdf", useDingbats=FALSE) 
plot(plot) 

我的背景除去國家的名字去除國名想要在我的點上啓用標籤,但背景文本基本上是擋道的。有誰知道我可以如何保留谷歌地形地圖,但放棄國名?謝謝!

+0

您是否嘗試過一些其他的maptypes可用在http://www.inside-r.org/packages/cran/ggmap/docs/get_map – MLavoie

+0

我做了,我無法讓標籤消失 – MolecularAnthropologist

+0

看到這個問題如何疊加地圖圖像[這裏](http://stackoverflow.com/questions/19307896/using-ggplots-ggmap-function-to-superimpose-two-maps-on-top-of-each-other/36350137 #36350137)。使用一張地圖作爲背景,添加你的geom_point,然後使用'inset_ggmap'將標籤放在最上面。 – jclouse

回答

5

也許這個問題不再與提問相關,但我今天遇到了同樣的問題,搜索了一下,發現this topic提問者有類似的問題,有人給出了一個非常有用的答案,提示style syntax of Google Static Maps API

所以,當你使用get_googlemap,而不是包裝get_map,你可以把一個額外的style參數,如:

map <- get_googlemap(center = 'middle east', zoom = 4, 
       style = 'feature:administrative.country|element:labels|visibility:off') 
    plot <- ggmap(map) 
    print(plot) 

有更多的功能和元素,你可以刪除或改變,但只是國家標籤可以通過上面的代碼簡單地刪除。

+0

還請注意[這個答案](http://stackoverflow.com/a/41051499/5977215),它顯示了使用樣式向量的問題和解決方案 – SymbolixAU