Takes lines and removes the start and end point, to a distance determined by the user.
geo_toptail(l, toptail_dist, ...)
A SpatialLines object
The distance (in metres) to top and tail the line by. Can either be a single value or a vector of the same length as the SpatialLines object.
Arguments passed to rgeos::gBuffer()
Note: toptailgs()
is around 10 times faster, but only works
on data with geographic CRS's due to its reliance on the geosphere
package.
Other lines:
angle_diff()
,
is_linepoint()
,
line2df()
,
line2points()
,
line_bearing()
,
line_breakup()
,
line_match()
,
line_midpoint()
,
line_sample()
,
line_segment()
,
line_via()
,
mats2line()
,
n_sample_length()
,
n_vertices()
,
onewaygeo()
,
points2line()
,
toptail_buff()
,
toptailgs()
,
update_line_geometry()
# NOT RUN {
lib_versions <- sf::sf_extSoftVersion()
lib_versions
# dont test due to issues with sp classes on some set-ups
if (lib_versions[3] >= "6.3.1") {
# l <- routes_fast[2:4, ] # to run with sp classes
l <- routes_fast_sf[2:4, ]
l_top_tail <- geo_toptail(l, 300)
l_top_tail
plot(sf::st_geometry(l_top_tail))
plot(sf::st_geometry(geo_toptail(l, 600)), lwd = 9, add = TRUE)
}
# }
Run the code above in your browser using DataLab