tests/testthat/test-db_functions.R

test_that("is.historical() works", {
  for (conn in get_test_conns()) {

    expect_true(is.historical(dplyr::tbl(conn, id("__mtcars_historical", conn))))
    expect_false(is.historical(dplyr::tbl(conn, id("__mtcars", conn))))

    connection_clean_up(conn)
  }
})

Try the SCDB package in your browser

Any scripts or data that you put into this service are public.

SCDB documentation built on Oct. 4, 2024, 1:09 a.m.