unbalhaar (version 2.1)

hard.thresh: Hard thresholding of a top-down Unbalanced Haar decomposition

Description

Presented with an object returned by best.unbal.haar, the function sets to zero those Unbalanced Haar coefficients which fall below a certain threshold sigma.

Usage

hard.thresh(buh, sigma = 1)

Arguments

buh

an object returned by best.unbal.haar containing the decomposition to be thresholded

sigma

the threshold (a positive scalar)

Value

a thresholded object, of the same class as buh

See Also

best.unbal.haar, hard.thresh.bu

Examples

# NOT RUN {
x <- rnorm(1000)
x.uh <- best.unbal.haar(x)
x.uh.th <- hard.thresh(x.uh)
x.uh.th.r <- reconstr(x.uh.th)
ts.plot(x.uh.th.r)
# }