if (FALSE) {
u_test = paste0("https://api.cyclestreets.net/v2/mapdata?key=c047ed46f7b50b1x",
"&limit=400&types=way&wayFields=name,ridingSurface,id,cyclableText,",
"quietness,speedMph,speedKmph,pause,color&zoom=16&",
"bbox=-9.160863,38.754642,-9.150128,38.75764")
# ways_test = sf::read_sf(u_test)
bb = "0.101131,52.195807,0.170288,52.209719"
bb = "-9.160863,38.754642,-9.150128,38.75764"
way_data = ways(bb)
plot(way_data)
bb = stplanr::routes_fast_sf
way_data = ways(bb)
plot(way_data)
}
Run the code above in your browser using DataLab