tests/testcontentcycle.R

test_that("test contentcycle",{
  conn <- RSQLite::dbConnect(RSQLite::SQLite(),"test_file.sqlite")
  list<-RSQLite::dbListTables(conn)
  expect_equal(any(list=="contentTableFull"),TRUE)
})
winnie0521/qckit documentation built on May 14, 2019, 7:54 a.m.