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

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)

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