JSThresh: Apply James-Stein Threshold

Description Usage Arguments Value See Also Examples

View source: R/JSThresh.R

Description

(also called the nonnegative garrote)

Usage

1
JSThresh(y, t)

Arguments

y

Noisy Data.

t

Threshold.

Value

x filtered result.

See Also

HardThresh, SoftThresh

Examples

1
2
3
4
5
6
7
f <- MakeSignal('HeaviSine', 2^3)
qmf <- MakeONFilter('Daubechies', 10)
L <- 0
wc <- FWT_PO(f, L, qmf)
thr <- 2
wct <- JSThresh(wc, thr)
fsoft <- IWT_PO(wct, L, qmf)

rwavelet documentation built on Jan. 13, 2021, 10:38 a.m.