# generate cyclic time series by adding a periodic signal to an OUSS process
times = seq(0,20,0.2);
signal = 0.75 * cos(2*pi*times) + generate_ouss(times, mu=0, sigma=1, lambda=1, epsilon=0.5);
# find periodogram peak and estimate statistical significance
report = evaluate.pm(times=times, signal=signal, minPeakFreq=0.3, minFitFreq=0.3);
# plot overview of periodogram peak analysis
plotReport(sprintf("Example"), times=times, signal=signal, report=report);
Run the code above in your browser using DataLab