r - 使用 ggmap 获取卫星地图时遇到问题

Question

此处推荐的代码，用于下载和绘制带有 ggmap 的谷歌地图对我有用。

newmap4 <- get_map(location = c(-71.2612362452596,42.3308503846824
                            ,-71.0475647202879,42.4560226746649), source = 'google')

 p <- ggmap(newmap4)
 p

但是，我真的希望能够绘制卫星地图，而不是地形图。我尝试如下。

newmap5 <- get_map(location = c(-71.2612362452596,42.3308503846824
                            ,-71.0475647202879,42.4560226746649), source = 'google',
               maptype = "satellite")

 p <- ggmap(newmap5)
 p

在这种情况下，R 打印出来的地图看起来与上面的 newmap 4 示例相同。有什么建议吗？

 Sys.info()

 sysname 
                                      "Linux" 
                                      release 
                             "4.4.0-1083-aws" 
                                      version   "#93-Ubuntu SMP Wed May 8 16:08:41 UTC 2019" 
                                     nodename  "application-997622-deployment-3251181-722tz" 
                                      machine 
                                     "x86_64" 
                                        login 
                                    "unknown" 
                                         user 
                               "rstudio-user" 
                               effective_user 
                               "rstudio-user"

标签： rggplot2ggmap

Answer 1

尝试使用相同的代码get_googlemap()代替get_map(). 我不确定为什么需要这样做，因为您指定来源是 Google。您是否注册了 Google API 密钥？

register_google(key = "<your key here>")
newmap5 <- get_googlemap(location = c(-71.2612362452596,42.3308503846824
                            ,-71.0475647202879,42.4560226746649), source = 'google',
               maptype = "satellite")
ggmap(newmap5)