test_that("Check that sampler works",{
set.seed(99)
expect_equal(
rbeta_dmp(n=100,p=0.9,sd=0.01)[1],
expected = 0.89754822
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.