tests/testthat/test-create_clock_model_from_name.R

context("test-create_clock_model_from_name")

test_that("use", {
  names <- c("strict", "relaxed_log_normal")
  for (name in names) {
    expect_equal(name, create_clock_model_from_name(name)$name)
  }
})
ropensci/beautier documentation built on March 12, 2019, 8:27 p.m.