Splitting River Segments at Specific Vertices in R Using sf Package