tests/testthat/test-are_clock_models.R

test_that("use", {
  expect_true(are_clock_models(create_strict_clock_model()))
  expect_false(are_clock_models("nonsense"))
  expect_false(are_clock_models(rep("nonsense", 2)))
  expect_false(are_clock_models(NA))
  expect_false(are_clock_models(NULL))
})
richelbilderbeek/beautier documentation built on April 4, 2024, 12:33 p.m.