tests/testthat/test-shuffle.R

test_that("shuffle works", {
  expect_snapshot(error = TRUE, shuffle(matrix(NA, 2, 2)))
  expect_length(shuffle(1:10), 10L)
  expect_identical(sort(shuffle(1:10)), 1:10)
})
cmu-delphi/epipredict documentation built on March 5, 2025, 12:17 p.m.