# Read the default data sheet
sample_data <- read_ptbx(system.file("extdata/Anholt_E_2024-09-15_0-10m.xlsx",
package = "SHARK4R"))
# Print output
sample_data
# Read a specific sheet
sample_info <- read_ptbx(system.file("extdata/Anholt_E_2024-09-15_0-10m.xlsx",
package = "SHARK4R"),
sheet = "sample_info.txt")
# Print output
sample_info
Run the code above in your browser using DataLab