wrm.filter(y, width, weight.type = 1, del = floor(width/2), extrapolate = TRUE)wrm.filter returns an object of class
wrm.filter. An
object of class wrm.filter is a list containing the
following components:plot returns a plot
showing the original time series with the filtered output.del roughly
equal to width/2. If the focus is rather on smoothing than on
signal extraction, the Epanechnikov kernel should be used rather than
the triangular kernel. In this case one can also use directly function wrm.smooth.dw.filter, hybrid.filter, wrm.smoothdata(Nile)
nile <- as.numeric(Nile)
obj <- wrm.filter(nile, width=11)
plot(obj)Run the code above in your browser using DataLab