tests/testthat/example_create_table/R/test_load.R

context("counts-test")

testthat::test_that("hobbies table created", {
  expect_equal(DBI::dbGetQuery(con, "SELECT count(*) from hobbies")[1, 1], 3)
})

testthat::test_that("houses table created", {
  expect_equal(DBI::dbGetQuery(con, "SELECT count(*) from abode")[1, 1], 2)
})
vimc/dettl documentation built on Oct. 6, 2022, 2:13 p.m.