tests/testthat/test-init_param.R

context("init_param")

test_that("use", {

  alpha_param <- create_alpha_param()
  testthat::expect_false(is_init_param(alpha_param))
  alpha_param <- init_param(alpha_param, id = 1)
  testthat::expect_true(is_init_param(alpha_param))
})
richelbilderbeek/beastscriptr documentation built on April 9, 2024, 2:28 p.m.