
Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
p <- matrix(1:4, ncol = 2)
library(sp)
l <- points2line(p)
plot(l)
l <- points2line(cents)
plot(l)
p <- line2points(routes_fast)
l <- points2line(p)
plot(l)
l_sf <- points2line(cents_sf)
plot(l_sf)
# }
Run the code above in your browser using DataLab