data-raw/intdata-otn_detection_schema.r

# Make otn_detection_schema (internal data object for read_otn_detections)
# Specify column names and data types for each detection file version




#----------------------------------------------------
# OTN

otn_detection_schema <- read.table(
  text = "
                                   name           type                 mapping
                                   catalognumber      character               animal_id
                                   commonname         character           common_name_e
                                   receiver_group     character            glatos_array
                                   receiver           character             receiver_sn
                                   station            character                 station
                                   tagname            character          transmitter_id
                                   codespace          character   transmitter_codespace
                                   datecollected        POSIXct detection_timestamp_utc
                                   longitude            numeric             deploy_long
                                   latitude             numeric              deploy_lat
                                   ",
  header = TRUE,
  stringsAsFactors = FALSE
)

# for non-matched detection extracts from OTN
otn_detection_schema_min_columns <- c(
  "catalognumber",
  "station",
  "datecollected",
  "longitude",
  "latitude"
)
# \OTN
#----------------------------------------------------


# add to sysdata.rda
rda_file <- file.path("R/sysdata.rda")
add_internal_data(otn_detection_schema, rda_file)
add_internal_data(otn_detection_schema_min_columns, rda_file)
ocean-tracking-network/glatos documentation built on April 17, 2025, 10:38 p.m.