data-raw/volt_temp.R

In mackerman44/telemetyr: Tools for processing, analysis, and visualization of telemetry data

## code to prepare `volt_temp` dataset goes here

library(telemetyr)
library(readr)

# set Biomark NAS prefix, depending on operating system
if(.Platform$OS.type != 'unix') {
  nas_prefix = "S:"
}
if(.Platform$OS.type == 'unix') {
  nas_prefix = "~/../../Volumes/ABS"
}

# Biomark NAS mapped to S:/
download_path = paste0(nas_prefix, "/data/telemetry/lemhi/fixed_site_downloads/2018_2019")

volt_temp = read_volt_temp_data(download_path,
                                receiver_codes = c("LH1", "CA1", "TR1", "RR1", "NF1"))

write_csv(volt_temp, "data-raw/volt_temp.csv")
usethis::use_data(volt_temp, overwrite = TRUE)