From aaa62cf8a45b9a7ed4f52f60332c41ea880fbf7a Mon Sep 17 00:00:00 2001 From: Bruce Delo Date: Mon, 1 Apr 2024 13:16:46 -0300 Subject: [PATCH] A couple more fixes, plus the last of the project code/detectedby fixes from Caitlin. --- R/imos_to_otn_receivers.R | 6 +++++- R/otn_imos_column_map.R | 2 +- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/R/imos_to_otn_receivers.R b/R/imos_to_otn_receivers.R index 2904fe9..0819fe1 100644 --- 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 index 6a51e85..c5b1bca 100644 --- 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,