tests/testthat/test-quantileCut.R

test_that("quantileCut sorta works", {
  expect_equal(
    tabulate(quantileCut(iris$Sepal.Length, 3)),
    c(52, 56, 42)
  )
})

Try the lsr package in your browser

Any scripts or data that you put into this service are public.

lsr documentation built on Dec. 11, 2021, 9:10 a.m.