\HeaderA{draw.wst}{Draw mother wavelet or scaling function associated with wst object.}{draw.wst}
\keyword{hplot}{draw.wst}
\begin{Description}\relax
This function draws the mother wavelet or scaling function associated with a  \code{\LinkA{wst.object}{wst.object}}.
\end{Description}
\begin{Usage}
\begin{verbatim}
draw.wst(wst, ...)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{wst}] The \code{\LinkA{wst}{wst}} class object whose associated wavelet or scaling function you wish to draw. 
\item[\code{...}] Additional arguments to pass to the \code{\LinkA{draw.default}{draw.default}} function which does the drawing. In particular, arguments can be set to choose between drawing the mother wavelet and scaling function, to set the resolution of the plot, to choose between drawing one and two dimensional pictures. 
\end{ldescription}
\end{Arguments}
\begin{Details}\relax
This function extracts the \code{filter} component from the \code{\LinkA{wst}{wst}} object (which is constructed using the \code{\LinkA{filter.select}{filter.select}} function) to decide which wavelet packet family to draw. Once decided the \code{\LinkA{draw.default}{draw.default}} function is used to actually do the drawing.
\end{Details}
\begin{Value}
If the \code{plot.it} argument is set to \code{TRUE} then nothing is returned. Otherwise, Otherwise, as with \code{\LinkA{draw.default}{draw.default}}, the coordinates of what would have been plotted are returned.
\end{Value}
\begin{Section}{RELEASE}
Version 3.6 Copyright Guy Nason 1995
\end{Section}
\begin{SeeAlso}\relax
\code{\LinkA{filter.select}{filter.select}}, \code{\LinkA{wst.object}{wst.object}}, \code{\LinkA{draw.default}{draw.default}}.
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
#
# Generate some test data
#
#test.data <- example.1()$y
#ts.plot(test.data)
#
# Now do the this-is-escaped-codenormal-bracket43bracket-normal  of the data using the Daubechies
# least-asymmetric wavelet N=10 (the default arguments in this-is-escaped-codenormal-bracket45bracket-normal).
#
#tdwst <- wst(test.data)
#
# What happens if we try to draw this new tdwst object?
#
#draw(tdwst)
#
# We get a picture of the wavelet that did the transform
#
\end{ExampleCode}
\end{Examples}

