# NOT RUN {
hw <- weight_streetnet (hampi)
xy <- dodgr_to_sfc (hw)
dim (hw) # 5.845 edges
length (xy$geom) # 682 aggregated linestrings aggregated from those edges
nrow (hampi) # compared to 191 linestrings in original sf object
dim (xy$dat) # same number of rows as there are geometries
# }
Run the code above in your browser using DataLab