thinLines,GRaster-method | R Documentation |
The thinLines()
function attempts to reduce linear features on a raster to just 1 cell wide. You may need to run thinLines()
multiple times on the same raster (or experiment with the iter
argument) to get acceptable output. thinLines()
can be helpful to run on a raster before using as.lines()
.
## S4 method for signature 'GRaster'
thinLines(x, iter = 200)
x |
A |
iter |
Numeric integer: Number of iterations (default is 200). |
A GRaster
.
as.lines()
, GRASS manual page for module r.thin
(see grassHelp("r.thin")
)
if (grassStarted()) {
# Setup
library(terra)
# Elevation
madElev <- fastData("madElev")
# Convert to GRaster:
elev <- fast(madElev)
# Thin elevation raster:
thinned <- thinLines(elev, iter = 300)
plot(thinned)
# Convert to lines:
rastToLines <- as.lines(thinned)
plot(rastToLines)
# We can clean this:
cleanLines <- fixDangles(x = rastToLines)
plot(rastToLines, col = "red")
plot(cleanLines, add = TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.