tests/test_db_create.R

library(ybt)
library(RSQLite)

ff = tempfile()
db_init(ff)

stopifnot(file.exists(ff))

con = dbConnect(SQLite(), ff)
stopifnot(all(dbListTables(con) %in% c("chn", "deployments", "detections", "tags")))
fishsciences/ybt documentation built on March 11, 2021, 8:45 a.m.