How to generate nodes from existing network? R

Question

I have a road segment called my_line with start point and end point

df <- data.frame(id = "a", lon1 = 1, lat1 = 5, lon2 = 7, lat2 = 9)  
dt <