## 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 a histogram of the residual distances
hist(rlens)
Run the code above in your browser using DataLab