\Header{smooth}{Median Smoothing}
\keyword{robust}{smooth}
\keyword{smooth}{smooth}
\begin{Description}\relax
This function applies Tukey's smoothing method \emph{3RSR}
to \code{x}.\end{Description}
\begin{Usage}
\begin{verbatim}
smooth(x)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{x}] a vector or time series
\end{ldescription}
\end{Arguments}
\begin{Value}
A vector or time series containing the smoothed values.
Note that there are other smoothing methods which provide
rather better results. This one was designed for hand calculations.\end{Value}
\begin{Note}\relax
\emph{3R} stands for \bold{R}epeated running \code{\Link{median}}s
of \bold{3}.\end{Note}
\begin{References}\relax
Tukey, J. W. (1977).
\emph{Exploratory Data Analysis},
Reading Massachusetts: Addison-Wesley.\end{References}
\begin{SeeAlso}\relax
\code{\Link{lowess}}; \code{\Link{loess}},
\code{\Link{supsmu}} and
\code{\Link{smooth.spline}} in package \file{modreg}.\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
library(eda)
data(presidents)
presidents[is.na(presidents)] <- 0
plot(presidents)
lines(smooth(presidents))
\end{ExampleCode}
\end{Examples}

