tests/testthat/test-mcmc-data.R

test_that("mcmc_data", {
  mcmcr_example <- mcmcr::mcmcr_example
  mcmc_data_example <- mcmc_data(mcmcr_example$alpha, dplyr::starwars[1:2, c("homeworld", "species", "films")])
  expect_identical(mcmc_data_example, mcmcdata::mcmc_data_example)
})
poissonconsulting/mcmcdata documentation built on June 5, 2023, 8:38 a.m.