我一直在R 中的get_map()函数(ggmap库)中遇到这个问题.
我的代码运行时无需source = "google"为几个月指定API密钥(for ).但是,代码在几周前停止了工作.我知道谷歌已经强制要求API密钥(或者他们可能在没有我用尽的api密钥的情况下允许一定数量的呼叫).
但是,即使在指定API密钥(从Google Cloud Platform获得)后,我的代码仍然以相同的方式运行.我甚至联系了谷歌云支持,但是他们说API密钥本身没有任何问题,他们可以在最后调用地图.
我怀疑该get_map()功能api_key在从谷歌调用地图时没有通过.任何指向解决方案的指针都将受到赞赏.
下面是可重现的代码(失败).
library(ggmap)
lat <- c(4,41) # India lat boundaries
lon <- c(68,99) # India long boundaries
center = c(mean(lat), mean(lon))
map <- get_map(location = c(lon = mean(lon),
lat = mean(lat)),
api_key = <my api key>,
zoom = 6,
maptype = "terrain",
source = "google",
messaging = TRUE
)
以下是R中的错误消息(注意API密钥未通过)
trying URL 'http://maps.googleapis.com/maps/api/staticmap?center=22.5,83.5&zoom=6&size=640x640&scale=2&maptype=terrain&language=en-EN&sensor=false'
Error in download.file(url, destfile = tmp, quiet = …刚刚过去的这个夏天,我正在对R中,我使用的封装代码mapview和ggmap.在夏天,代码工作正常.在过去的一周里,我运行了代码而没有任何更改,当我使用时,我收到以下消息mapview:
mapview(as(tr10, "Spatial"), zcol = "utc_timestamp", lwd = 5,
legend = TRUE)
Error in htmlwidgets::sizingPolicy(defaultWidth = defaultWidth, defaultHeight = defaultHeight, :
unused argument (browser.external = FALSE)
我没有对我的代码进行任何更改,我升级包以防万一,但仍然无法正常工作.并与ggmap我得到以下几点:
puerto_rico <- get_map(location = c(lon = mean(long), lat = mean(lat)),
maptype = "terrain", source = "google",
zoom = 12)
Error in download.file(url, destfile = tmp, quiet = !messaging, mode = "wb") :
cannot open URL 'http://maps.googleapis.com/maps/api/staticmap?center=18.2,-67.1&zoom=12&size=640x640&scale=2&maptype=terrain&language=en-EN&sensor=false'
In addition: Warning message:
In download.file(url, destfile = tmp, …