tests/testthat/test-english_names.R

test_that("make_english_names works", {
  expect_equal(
    length(make_english_names(2)),
    2
  )
  expect_true(all(grepl(
    "\\d$",
    make_english_names(100, retry = TRUE)
  )))
})
mikemahoney218/proceduralnames documentation built on Aug. 17, 2022, 7:07 p.m.