tests/testthat/test-quantileCut.R

test_that("quantileCut sorta works", {
  expect_equal(
    tabulate(quantileCut(iris$Sepal.Length, 3)),
    c(52, 56, 42)
  )
})
djnavarro/lsr documentation built on Dec. 20, 2021, 12:04 a.m.