tests/testthat/test-num_cobinations.R

In sellorm/memorids: Provides A Memorable ID

context("number of combinations")

test_that("only a single item is returned", {
  expect_equal(length(memorids:::num_combinations()), 1)
})

test_that("the output in an integer", {
  expect_is(memorids:::num_combinations(), "integer")
})