Как получить полилинию маршрута из REST API - PullRequest
0 голосов
/ 14 марта 2019

Я занимаюсь разработкой приложения с использованием Shiny и буклета из R. И мне нужно составить маршрут получения с помощью REST API.

Я пытаюсь получить полилинии, используя это:

query <- paste0("&waypoint0=geo!", 
              lat_usuario, 
              ",", 
              long_usuario, 
              "&waypoint1=geo!",
              lat_of, 
              ",", 
              long_of, 
              "&departure=", fecha, 
              "&mode=fastest;car;traffic:enabled")

paste0("https://route.api.here.com/routing/7.2/calculateroute.json", 
     "?app_id=", App_id, "&app_code=", App_code, query) %>%
RCurl::getURL(verbose = FALSE) %>%
RJSONIO::fromJSON() %>%
.[["response"]] %>%
.[["route"]] %>%
.[[1]] %>%
.[["leg"]] %>%
.[[1]] %>%
.[["maneuver"]] %>%
sapply("[[", "position") %>%
return()

Но, когда я представляю, используя этот код:

leafletProxy("mapa", data = values$tabla) %>%
   clearShapes()  %>%
   addPolylines(pol[2,], pol[1,], stroke=0.2)

Я понимаю, что полилинии не на улице. Как показано на рисунке:

i

Как мне проложить маршрут по улицам?

1 Ответ

0 голосов
/ 14 марта 2019

Решил сам.

Ключ включает в запрос "& routeAttributes = sh". И затем, мы получаем формы маршрута (чтобы иметь возможность построить их).

...