tests/testthat/test-type_sum.R

test_that("works with glimpse", {
  foo <- as_override_type_sum(2011:2013)
  expect_equal(type_sum(foo), "SC")
  expect_output(glimpse(tibble(foo)), "foo <SC>")
})
hadley/tibble documentation built on Feb. 3, 2024, 10:41 a.m.