A function that facilitates a users' workflow by helping to check for DATs in a directory.
Examples
if (FALSE) {
fpath <- system.file("extdata", package = "normfluodbf", mustWork = TRUE)
setwd(fpath)
check_dat(getwd())
}
A function that facilitates a users' workflow by helping to check for DATs in a directory.
if (FALSE) {
fpath <- system.file("extdata", package = "normfluodbf", mustWork = TRUE)
setwd(fpath)
check_dat(getwd())
}