tests/testthat/test_beta-utils.R

context("Testing beta-utils \n")

test_that("beta names are correct", {
  expect_identical(get_beta_names("normal"), c("mu", "sigma"))
  expect_identical(get_beta_names("exp"), "rate")
  expect_identical(get_beta_names("weibull"), c("shape", "scale"))
})

Try the LambertW package in your browser

Any scripts or data that you put into this service are public.

LambertW documentation built on May 29, 2024, 4:30 a.m.