powered by
Performs sinc interpolation for a equidistant time series x to times t.
x
t
sincfilter(t, x, wr=8)
a vector of interpolated values of the time series at time points given in t.
vector of new time points
observed time series at times 1:length(x).
1:length(x)
determines truncation of series expansion
Joerg Polzehl polzehl@wias-berlin.de
slicetiming
x <- 1:107 y <- rnorm(x) z <- sincfilter(seq(1,107,.01),y) plot(x, y, ylim=range(y,z)) lines(seq(1,107,.01),z,col=2)
Run the code above in your browser using DataLab