R: Examples for 'stplanr::line

### ** Examples

l <- routes_fast_sf[2, ]
l_seg2 <- line_segment1(l = l, n_segments = 2)

Error in st_geometry.sf(x): attr(obj, "sf_column") does not point to a geometry column.
Did you rename it, without setting st_geometry(obj) <- "newname"?

# Test with rsgeo (must be installed):
# l_seg2_rsgeo = line_segment1(l = l, n_segments = 2)
# waldo::compare(l_seg2, l_seg2_rsgeo)
l_seg3 <- line_segment1(l = l, n_segments = 3)

Error in st_geometry.sf(x): attr(obj, "sf_column") does not point to a geometry column.
Did you rename it, without setting st_geometry(obj) <- "newname"?

l_seg_100 <- line_segment1(l = l, segment_length = 100)

Error in st_geometry.sf(x): attr(obj, "sf_column") does not point to a geometry column.
Did you rename it, without setting st_geometry(obj) <- "newname"?

l_seg_1000 <- line_segment1(l = l, segment_length = 1000)

Error in st_geometry.sf(x): attr(obj, "sf_column") does not point to a geometry column.
Did you rename it, without setting st_geometry(obj) <- "newname"?

plot(sf::st_geometry(l_seg2), col = 1:2, lwd = 5)

Error in sf::st_geometry(l_seg2): object 'l_seg2' not found

plot(sf::st_geometry(l_seg3), col = 1:3, lwd = 5)

Error in sf::st_geometry(l_seg3): object 'l_seg3' not found

plot(sf::st_geometry(l_seg_100), col = seq(nrow(l_seg_100)), lwd = 5)

Error in sf::st_geometry(l_seg_100): object 'l_seg_100' not found

plot(sf::st_geometry(l_seg_1000), col = seq(nrow(l_seg_1000)), lwd = 5)

Error in sf::st_geometry(l_seg_1000): object 'l_seg_1000' not found

Examples for 'stplanr::line_segment1'

Segment a single line, using lwgeom or rsgeo