лкнулся с этой проблемой вget_map() функция (ggmap библиотека) в р.

Мой код выполнялся без необходимости указывать ключ API (дляsource = "google") в течение нескольких месяцев. Однако код перестал работать пару недель назад. Я понял, что Google сделал ключ API обязательным (или, возможно, они допустили определенное количество вызовов без ключа API, который я исчерпал).

Однако даже после указания ключа API (полученного из Google Cloud Platform) мой код продолжал работать так же. Я даже связался со службой поддержки Google Cloud, но они сказали, что в самом ключе API нет ничего плохого, и они смогли вызвать карту в конце.

Я подозреваюget_map() функция не передаетapi_key во время вызова карты из Google. Любые указатели на разрешение будут оценены.

Ниже приведен воспроизводимый код (который не работает).

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 = !messaging, mode = "wb") : 
  cannot open 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'
In addition: Warning message:
In download.file(url, destfile = tmp, quiet = !messaging, mode = "wb") :
  cannot open 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': HTTP status was '403 Forbidden'