Median filter

Sliding-window median. Robust to impulsive (salt-and-pepper) noise.

Usage

morie_dsp_median_filter(x, kernel_size = 5L)

Arguments

x

Numeric vector.

kernel_size

Odd positive integer kernel length. Default 5.

Value

Filtered vector, length(x).

References

Rangayyan & Krishnan (2015), Ch. 3, sec. 3.4.

Examples

x <- c(0, 0, 0, 0, 50, 0, 0, 0, 0)
morie_dsp_median_filter(x, kernel_size = 3L)
#> [1] 0 0 0 0 0 0 0 0 0