data-raw/Poop-link/unmatched_poop_link.R

library(readr)
library(dplyr)
unmatched_poop_link = read_csv("https://raw.githubusercontent.com/KluaneRedSquirrelProject/poop/master/output/poop_no-matches.csv") %>%
  mutate(squirrel_id = NA) %>%
  rename(trapping_id = id)

usethis::use_data(unmatched_poop_link, overwrite = TRUE)
mwhalen18/krspfecals documentation built on Dec. 21, 2021, 11:05 p.m.