tests/testthat/test-divide_vector.R

test_that("divide vectors", {
  result <- divide_samples(100,3,2)
  expect_type(result, "list")
  expect_true(length(result) > 0)
})

Try the SUMO package in your browser

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

SUMO documentation built on June 8, 2025, 12:45 p.m.