if (FALSE) { # interactive()
bucharest_osm <- get_osm_example_data()
corridor <- bucharest_dambovita$corridor
network <- rbind(bucharest_osm$streets, bucharest_osm$railways) |>
as_network()
river <- bucharest_osm$river_centerline
delineate_segments(corridor, network, river)
}
Run the code above in your browser using DataLab