R/soft.R

In bjw34032/waveslim: Basic Wavelet Routines for One-, Two-, and Three-Dimensional Signal Processing

Defines functions soft

Documented in soft

soft <- function(x, T) {
  y <- max(abs(x) - T, 0)
  return(y/(y+T) * x)
}