# NOT RUN {
# generate example series with periods of 405 ka, 100 ka and 20 ka, plus noise
ex=cycles(freqs=c(1/405,1/100,1/20),noisevar=.1,dt=5)
# lowpass filter using cosine-tapered window
res_ex=lowpass(ex,fcut=.02,win=2,p=.4)
# }
Run the code above in your browser using DataLab