tests/testthat/test-divide.R

test_that("divide() differs from cut()", {
  x <- seq(0, 100, 0.01)
  expect_true(is.ordered(divide(x)))
})

Try the Keng package in your browser

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

Keng documentation built on Sept. 1, 2026, 5:07 p.m.