shortest_path_igraph(from_node_ID = 25,
to_node_ID = 33,
unit = "minutes",
path = TRUE,
graph_object = graph_sampledata) %>%
path_leaflet(graph_object = graph_sampledata)
Run the code above in your browser using DataLab