tests/testthat/test-profile.R

RNGkind("L'Ecuyer-CMRG")
set.seed(123)
test_that("profile_plot", {
  vdiffr::expect_doppelganger("profile_plot",
    profile_plot(get_data(samples_LNR), get_design(samples_LNR)[[1]], credint(samples_LNR, probs = .5)[[1]]))
})

Try the EMC2 package in your browser

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

EMC2 documentation built on April 11, 2025, 5:50 p.m.