## Calculate pointer years on detrended tree-ring series
data(s033)
detr_s033 <- detrend(s033, method = "Spline", nyrs = 15)
pz1 <- pointer.zchron(detr_s033)
head(pz1$out)
## Calculate pointer years with user-defined arguments
data(s033)
detr_s033 <- detrend(s033, method = "Spline", nyrs = 15)
pz2 <- pointer.zchron(detr_s033, period = c(1950,2010), z.thresh = 1.28,
make.plot = TRUE)
head(pz2$out)
Run the code above in your browser using DataLab