GGMAP, чтобы получить расстояние от датафрейма - PullRequest
Новая
       29

GGMAP, чтобы получить расстояние от датафрейма

0 голосов
/ 13 марта 2020

Я пытаюсь использовать функцию mapdist() из пакета ggmap для получения расстояний перемещения от координат в кадре данных. 

# need an api key to use the ggmap function

register_google(key = "") 

library (tidyverse)
library(ggmaps)
starting_point <- tribble(
  ~row_id, ~X, ~Y,
  1, -119.13968, 50.53766,
  2, -134.26792, 60.45440
)
destination_1 <- tribble( 
  ~row_id, ~X, ~Y,
  1, -119.13968, 50.53766,
  2, -134.26792, 60.45440
)
destination_2 <- tribble(
  ~row_id, ~X, ~Y,
  1, -119.13835, 50.55011,
  2, -135.05166, 60.71958
)

Мне нравится вывод, полученный здесь 

# get coordinates 
(wh <- as.numeric(geocode("white house")))
(lm <- as.numeric(geocode("lincoln memorial washington dc")))
# entering coordinate instead of address
(df <- mapdist(wh, lm, mode = "driving"))

Я хочу получить обратно два фрейма данных, используя starting_point в качестве начала и два набора данных назначения в качестве конца. Идентификатор строки дает указание c местоположений, к которым я буду стремиться sh.

Я попытался ввести координаты в виде списка и матрицы и все еще, кажется, получаю ошибку.

...