# Example 1: Basic usage
example_data_strat |>
ggstrat_label(section_name = "21LSHD02",
label = "SampleID")
# Example 2: Combine with a stratigraphic section plot using patchwork
if (requireNamespace("patchwork", quietly = TRUE)) {
stratsection <- example_data_strat |>
ggstrat(section_name = "21LSHD02")
samples <- example_data_strat |>
ggstrat_label(section_name = "21LSHD02",
label = "SampleID")
stratsection + samples
}
Run the code above in your browser using DataLab