### as a test series, use the three dominant precession terms from Berger et al. (1992)
ex<-cycles(start=0,end=1000,dt=2)
### now conduct astrochronologic testing
res1=testPrecession(ex)
### if you plan to run testPrecession repeatedly, it is advisable to download the astronomical
### solution and construct esinw first
ex2<-getLaskar()
ex3<-etp(tmin=0,tmax=1000,dt=2,eWt=0,oWt=0,pWt=1,esinw=TRUE,solution=ex2,standardize=FALSE)
### now conduct astrochronologic testing
res2<-testPrecession(ex,esinw=ex3)
Run the code above in your browser using DataLab