powered by
Apply Soft Threshold
SoftThresh(y, t)
A numeric vector with entries
\(x_i = \mathrm{sign}(y_i)\max(|y_i| - t, 0)\).
Noisy Data.
Threshold.
HardThresh
f <- MakeSignal('HeaviSine', 2^3) qmf <- MakeONFilter('Daubechies', 10) L <- 0 wc <- FWT_PO(f, L, qmf) thr <- 2 wct <- SoftThresh(wc, thr) fsoft <- IWT_PO(wct, L, qmf)
Run the code above in your browser using DataLab