## load the Imbrie and Kipp example data
data(ImbrieKipp, SumSST, V12.122)
## squared residual lengths for Core V12.122
rlens <- residLen(ImbrieKipp, SumSST, V12.122)
rlens
## plot the density functions of the residual distances
densityplot(rlens)
Run the code above in your browser using DataLab