in query, lifespan=c(10,12, NA), ersults in all data being removed from monitor 029, with no warning!
dir <- paste0(scopr_example_dir(), "/ethoscope_results/")
query <- data.frame(machine_name = c("E_014", "E_014","E_029"),
date = c("2016-01-25", "2016-02-17","2016-01-25"),
time = c("21:46:14", NA, NA),
test=c(1,2,3),
lifespan=c(10,12, NA)
)
in query,
lifespan=c(10,12, NA), ersults in all data being removed from monitor 029, with no warning!