tests/testthat/test-as-nlist.R

test_that("as_nlist.mcmcr", {
  nlist <- nlist::nlist(x = 1, y = matrix(1:4, 2))
  expect_equal(nlist::as_nlist(as.mcmcr(nlist)), nlist)
})
poissonconsulting/mcmcr documentation built on Jan. 18, 2024, 1:11 a.m.