tests/testthat/test_impute.R

context("")
test_that("The impute are", {
  expect_equal(impute(no_of_impute = 100, number_mcmc = 10000)$N_impute, 100)
  expect_equal(impute(no_of_impute = 100, number_mcmc = 1000)$number_mcmc, 1000)
})

Try the bayesCT package in your browser

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

bayesCT documentation built on July 2, 2020, 2:34 a.m.