R: Examples for 'stplanr::overline

### ** Examples

routes_fast_sf$value <- 1
sl <- routes_fast_sf[4:6, ]
attrib <- c("value", "length")
rnet <- overline_intersection(sl = sl, attrib)

Error in .subset2(x, i, exact = exact): attempt to select less than one element in get1index

plot(rnet, lwd = rnet$value)

Error in plot(rnet, lwd = rnet$value): object 'rnet' not found

# A larger example
sl <- routes_fast_sf[4:7, ]
rnet <- overline_intersection(sl = sl, attrib = c("value", "length"))

although coordinates are longitude/latitude, st_intersection assumes that they
are planar

plot(rnet, lwd = rnet$value)

plot of chunk example-stplanr-overline_intersection-1

rnet_sf <- overline(routes_fast_sf[4:7, ], attrib = c("value", "length"))
plot(rnet_sf, lwd = rnet_sf$value)

# An even larger example (not shown, takes time to run)
# rnet = overline_intersection(routes_fast_sf, attrib = c("value", "length"))
# rnet_sf <- overline(routes_fast_sf, attrib = c("value", "length"), buff_dist = 10)
# plot(rnet$geometry, lwd = rnet$value * 2, col = "grey")
# plot(rnet_sf$geometry,  lwd = rnet_sf$value, add = TRUE)

Examples for 'stplanr::overline_intersection'

Convert series of overlapping lines into a route network