tests/testthat/test-looIndex.R

test_that("looIndex works", {
  out <- looIndex(15)
  expect_length(out, 15L)
  expect_true(all(lengths(out) == 14L))
})
llrs/inteRmodel documentation built on April 1, 2022, 4:04 p.m.