## Not run:
# data(ring.raw)
# data(ring.stand)
# data(dbh.po.nc)
# #Subset near-pith is the material within 0 -20cm from the estimated pith
# spline200.sub0.20.n <- TruncSeriesPithoffset( ring.raw, ring.stand, dbh.po.nc, c(1,200))
# # Subset far-pith is the material further than 20cm from the estimated pith
# spline200.sub20.2000.n <- TruncSeriesPithoffset( ring.raw, ring.stand, dbh.po.nc, c(200,200000))
# # Whole dataset, through truncated functions to get in the same formate as the above two datasets
# spline200.sub0.2000.n <- TruncSeriesPithoffset( ring.raw, ring.stand, dbh.po.nc, c(00,200000))## End(Not run)
Run the code above in your browser using DataLab