A couple more fixes, plus the last of the project code/detectedby fix…

…es from Caitlin.
ocean-tracking-network · Apr 1, 2024 · aaa62cf · aaa62cf
1 parent 8c5fc48
commit aaa62cf
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/R/imos_to_otn_receivers.R b/R/imos_to_otn_receivers.R
@@ -34,7 +34,11 @@ imos_to_otn_receivers <- function(rcvr_dataframe) {
       AR_SERIAL_NO = NA,
       DATA_DOWNLOADED = NA,
       DOWNLOAD_DATE_TIME = NA,
-      COMMENTS = NA
+      COMMENTS = NA,
+      TRANSMITTER = NA,
+      TRANSMITTER_MODEL = NA,
+      DEPLOYED_BY = NA,
+      FILENAME = NA
     ) %>%
     rename(
       OTN_ARRAY = receiver_project_name,

diff --git a/R/otn_imos_column_map.R b/R/otn_imos_column_map.R
@@ -94,7 +94,7 @@ otn_imos_column_map <- function(det_dataframe, rcvr_dataframe = NULL, tag_datafr
       WORMS_species_aphia_id = sapply(det_dataframe$scientificname, USE.NAMES = FALSE, FUN = get_aphiaid_from_lookup, lookup = lookup),
       animal_sex = NA,
       receiver_name = receiver,
-      receiver_project_name = receiver_group,
+      receiver_project_name = detectedby,
       transmitter_serial_number = NA,
       transmitter_type = NA,
       transmitter_sensor_type = NA,