How to export SHP file after Spatial networks in R with sf and tidygraph

Question

I have worked with centrality calculation from OSM database. I followed the instruction https://www.r-spatial.org/r/2019/09/26/spatial-networks.html .

However, I want to