# Locate the example Excel files shipped with the package
path <- system.file("extdata", "example_inputs.xlsx",
package = "avstrat"
)
# Read them with readxl
library(readxl)
stations <- readxl::read_xlsx(path, sheet = "stations")
sections <- readxl::read_xlsx(path, sheet = "sections")
layers <- readxl::read_xlsx(path, sheet = "layers")
samples <- readxl::read_xlsx(path, sheet = "samples_layer")
load_stratdata_indiv(stations_upload = stations,
sections_upload = sections,
layers_upload = layers,
samples_upload = samples)
Run the code above in your browser using DataLab