# Example data is included with the package
data("example_data_strat", package = "avstrat")
# Order + thickness method (section "fake1")
df1 <- subset(example_data_strat, stratsection_name == "fake1")
add_depths(df1)
# Start/stop depth method (section "fake3")
df2 <- subset(example_data_strat, stratsection_name == "fake3")
add_depths(df2)
Run the code above in your browser using DataLab