tests/testthat/test-mod_tbl_fct.R

test_that("test tableau with gt", {
  df <- sim_binom()
  out <- gt_probs(df, title = "Title", subtitle = "Subtitle")
  expect_s3_class(out, class = "gt_tbl")
})
FrankLef/ShinyTemp1 documentation built on Feb. 25, 2022, 12:23 p.m.