data(storks)
which(findGoodPoints( storks[[2]],
windowSize = 29, isSamplingRegular = 1,
isThermallingFunction = getDefaultIsThermallingFunction(360, 4), maxPointsToUseInEstimate = 10,
phiInitialEstimate = 0 ))
Run the code above in your browser using DataLab