wave.filter(wavelet, filter=NULL, high.pass=F, dual.filter=F, even.filter=F, filter.seq=NULL, start=0) is.dual(x) is.high.pass(x) is.low.pass(x) is.orthogonal(x) is.symmetric(x) is.antisymmetric(x)
"d4"
.
See
wavelet.packet
for a list of all available wavelet names.
For user-defined filter, input the values the
filter
argument (see below).
filter
is a vector or a list of length 1,
it is assumed to be the low-pass filter (therefore the sum of the filter
coefficients must be nonzero) and the high-pass filter
will be computed by the usual quadrature mirror. If
filter
is
a list of length 2 or more,
filter[[1]]
will be assumed to be
the low-pass filter and
filter[[2]]
will be assumed to be the
high-pass filter.
filter.seq
is supplied.
L
s and
H
s.
If present, cascade filter is computed.
wave.filter
, see
wave.filter.object
for details.
is.dual
returns
TRUE
if
x
is a dual filter, and
FALSE
otherwise.
is.high.pass
returns
TRUE
if
x
is a high-pass filter, and
FALSE
otherwise.
is.low.pass
returns
TRUE
if
x
is a low-pass filter, and
FALSE
otherwise.
is.orthogonal
returns
TRUE
if
x
is an orthogonal filter, and
FALSE
otherwise.
is.symmetric
returns
TRUE
if
x
is a symmetric vector, and
FALSE
otherwise.
is.antisymmetric
returns
TRUE
if
x
is a anti-symmetric vector,
and
FALSE
otherwise.
For more details, refer to the chapter "Algorithms and Filters" of the S+WAVELETS User's Manual.
Daubechies, I. (1992). Ten Lectures on Wavelets. SIAM, Philadelphia.
wf <- wave.filter("s8") par(mfrow=c(2,2)) plot(wf) # plot the 8 taps of low-pass S8 transfer.plot(wf) # plot the amplitude of the transfer function transfer.plot(wf, phase=T) # plot the phase of the transfer function plot(wavelet("s8")) # plot the scaling function of S8