tests/testthat/test-assign_summary_type.R

In gtsummary: Presentation-Ready Data Summary and Analytic Result Tables

skip_on_cran()

test_that("auto-assign continuous: mtcars$hp", {
  expect_equal(
    assign_summary_type(
      data = mtcars, variable = "hp",
      summary_type = NULL, value = NULL
    ),
    "continuous"
  )
})