Я пытаюсь использовать функцию mapdist в пакете ggmap в R, но получаю сообщение об ошибке. Предупреждение: Обратное геокодирование завершилось ошибкой: этот проект API не авторизован для использования этого API.ниже мой код
> p1
[1] -77.1365 38.8190
> p2
[1] -77.0625 38.8049
> mapdist(p1, p2, mode = "walking")
Warning: Reverse geocoding failed with error:
This API project is not authorized to use this API.
Warning: Reverse geocoding failed with error:
This API project is not authorized to use this API.
# A tibble: 1 x 3
from to mode
<chr> <chr> <chr>
1 NA NA walking
Я проверил приведенные ниже коды, чтобы проверить, правильно ли я включил все API в консоли Google, и он работает
> (wh <- as.numeric(geocode("the white house, dc")))
Source : https://maps.googleapis.com/maps/api/geocode/json?address=the+white+house,+dc&key=xxx
[1] -77.03653 38.89768
> (lm <- as.numeric(geocode("lincoln memorial washington dc")))
Source : https://maps.googleapis.com/maps/api/geocode/json?address=lincoln+memorial+washington+dc&key=xxx
[1] -77.05018 38.88927
> mapdist(wh, lm, mode = "walking")
Любая помощь очень ценится.Спасибо!