tests/testthat/test-names-datas.R

test_that("names_datas", {
  expect_identical(ps_names_datas(), character(0))
  mtcars <- datasets::mtcars
  expect_identical(ps_names_datas(), "mtcars")
})
poissonconsulting/poisdata documentation built on Jan. 17, 2025, 10:27 p.m.