tests/testthat/test-pull_distinct.R

context("pull_distinct")

test_that("mtcars", {

  expected <-
    c(4, 6, 8)

  expect_setequal(
    pull_distinct(mtcars, cyl),
    expected)

})
BAAQMD/tbltools documentation built on Feb. 29, 2024, 5:45 a.m.