1library (dodgr) 2graph <- weight_streetnet (hampi) 3graph <- dodgr_sample (graph, nverts = 100) 4d <- dodgr_dists (graph)