tests/testthat/test-show_tdlcrk.R

test_that("Checking show_tdlcrk class", {
  result <- show_tdlcrk(tdldat)
  expect_is(result, 'leaflet')
})
tbep-tech/tbeptools documentation built on April 13, 2025, 4:50 p.m.