age_depth_as_sec_axis function

Use an age depth model as a second ggplot axis