r - 使用ggmap世界地图

Question

我正在尝试结合使用ggmap包/get_map功能(参见下面的代码)和ggplot2来获取整个世界的简单栅格 map 。缩放级别仅趋向“3”，并且不允许进一步缩小

似乎不可能获得世界地图(如 ggmap 描述中所述:(“目前不支持整个世界的 map ”)。也许是由于缺乏理解为什么这是不可能/不支持的，是否有解决方法/替代解决方案来获得世界地图 View ？

编辑/更新问题:我尝试按照建议使用世界地图 - 但出于某种原因，我不明白为什么它不允许我在图表中绘制点(这是最初的目标，并且在 ggmap 中工作)-感觉我正在做一些愚蠢的事情/犯基本错误。我收到错误消息 “eval(expr, envir, enclos) 中出现错误:未找到对象 'group'”

编辑-不幸的是我使用 OpenStreetMap 收到一条错误消息(java错误。正在解决这个问题-但非 OpenStreetMap 解决方案会很棒...)

总结一下 - ggmap 方法适用于 geom_point，但我无法获得整个世界地图。 worldmap 方法应该可以工作，但由于某种原因无法获取要绘制的点......

新代码如下:

ggmap 方法:

library(ggmap)
library(ggplot2)

reclat=c(50,20,30,40)
reclong=c(30,40,30,50)         
points=as.data.frame(cbind(reclat,reclong))

al1 = get_map(location = 'Europe', zoom = 3, color="bw",maptype = "satellite")
map = ggmap(al1)
map 

#this works
map+geom_point(data=points, aes(x=reclong, y=reclat, colour="red"))

世界地图方法:

world <- map_data("world")
worldmap <- ggplot(world, aes(x=long, y=lat, group=group)) +
  geom_path() +
  scale_y_continuous(breaks=(-2:2) * 30) +
  scale_x_continuous(breaks=(-4:4) * 45)

#this works
worldmap + geom_point(aes(50, 30, colour="red"))

#this doesnt work
worldmap + geom_point(data=points, aes(x=reclong, y=reclat, colour="red"))

Answer 1

您可以尝试 OpenStreetMap 软件包，它可以访问许多不同的 map 服务器，但不能访问 GoogleMaps。

library(OpenStreetMap)
library(ggplot2)
map <- openmap(c(70,-179),
               c(-70,179),zoom=1)
map <- openproj(map)


reclat <- c(50,20,30,40)
reclong <- c(30,40,30,50)         
autoplot(map) + geom_point(aes(x=reclong,y=reclat))