tests/testthat/test-generate_data.R

test_that("draw_data: general tests", {
  data <- draw_data()
  expect_equal(length(data), 2)
})

Try the cases package in your browser

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

cases documentation built on April 3, 2025, 9:24 p.m.