# NOT RUN {
data(sp1)
depths(sp1) <- id ~ top + bottom
# generate depth-class matrix
sdc <- getSoilDepthClass(sp1, name='name', top='top', bottom='bottom')
# inspect
head(sdc)
# join back into sp1 as site-level data
site(sp1) <- sdc
# }
# NOT RUN {
# sample data
data(gopheridge, package='soilDB')
getSoilDepthClass(gopheridge)
# }
Run the code above in your browser using DataLab