tests/testthat/test-pluralise.R

context("Test pluralise function")

test_that("pluralise() works", {
  expect_error(pluralise())
  expect_error(pluralise("week"))
  expect_error(pluralise(0))
  expect_equal(pluralise(5), "s")
  expect_equal(pluralise(-10, "year"), "years")

})
moj-analytical-services/RAP_code_library documentation built on Aug. 19, 2023, 2:41 p.m.