filter_voids: Filter objects by size

In GastonMauroDiaz/rdemtools: Digital elevation model editing tools

Description

Filter objects by size

Usage

filter_voids(x, thr_size_in_pixels = 50, smallers_stay = TRUE)

Arguments

x	RasterLayer. Binary image.
thr_size_in_pixels	numeric. Threshold value, an object size in pixels.
smallers_stay	logical

Value

RasterLayer

Examples

r <- raster(ncol = 200, nrow = 100)
extent(r) <- extent(0, 200, 0, 100)
projection(r) <- projection(r) <- CRS("+init=epsg:32718")

###reference
set.seed(11)
reference <- fake_dem(r, n_random_data = 60, z_range = c(0, 600))
plot(reference)


p <- sampleRegular(reference, 10, sp = TRUE)
bigVoidsMask <- fake_voids(p, void_size = 20, reference)
p <- sampleRandom(reference, 10, sp = TRUE)
set.seed(1)
smallVoidsMask <- fake_voids(p, void_size = 3, reference, is_circular = TRUE)
voidsMask <- bigVoidsMask + smallVoidsMask
voidsMask <- voidsMask != 0

plot(voidsMask)

m <- filter_voids(voidsMask)
plot(m)

GastonMauroDiaz/rdemtools documentation built on Oct. 22, 2019, 8:32 p.m.