tests/testthat/test-assertions.R

test_that("assertions", {

  expect_true(is_dt(data.table::data.table(a = 1, b = 2)))
  expect_false(is_dt(NULL))
  expect_false(is_dt(list(a = 1, b = 2)))
  expect_false(is_dt(data.frame(a = 1, b = 2)))

})

Try the ricu package in your browser

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

ricu documentation built on Sept. 8, 2023, 5:45 p.m.