Как точно воспроизвести исторические ORS-изохроны? - PullRequest
0 голосов
/ 24 сентября 2018

Во время воспроизведения исторических изохрон, созданных с помощью API ORS - openrouteservice.org , я столкнулся с проблемами с разрешением.Около 3 лет назад возвращенные изохроны имели более высокое разрешение, чем сегодня, и нет никакой возможности манипулировать каким-либо параметром разрешения (насколько я знаю).

История ORS (3 года назад): более высокое разрешение enter image description here

ORS сегодня: более низкое разрешение

library(leaflet)
library(openrouteservice)
coords <- c(9.4619375, 47.4776429)

isochrone_ors <- ors_isochrones(coords, range = 11*60)
leaflet() %>% 
  addProviderTiles(providers$Stamen.TonerLite, group = "Toner Lite") %>% 
  addGeoJSON(geojson = isochrone_ors) %>% 
  fitBBox(isochrone_ors$bbox)

enter image description here

OSRM: сегодня

Я пытался воспроизвести изохроны, используя osrm::osrmIsochrone().К сожалению, эта реализация osrm генерирует квадратные и частично разрозненные изохроны для довольно низких разрешений, что далеко от исторических ORS-изохрон.

Внимание: используемый сервер http://router.project-osrm.org/ не очень стабилен

options(osrm.server = "http://router.project-osrm.org/", osrm.profile = "driving") 

isochrone_osrm <- osrm::osrmIsochrone(loc = coords, breaks = c(0,11), res = 150)
leaflet() %>% 
  addProviderTiles(providers$Stamen.TonerLite, group = "Toner Lite") %>% 
  addPolygons(data = isochrone_osrm)

enter image description here

У кого-нибудь из вас есть идея?о том, как лучше воспроизвести исторические изохроны?Есть ли более подходящие пакеты или API?

...