tests/testthat/test-rbern.R

test_that("bernoulli rvs can be generated", {
  expect_equal(sum(rbern(10,1)), 10)
})
flyaflya/causact documentation built on Jan. 23, 2025, 2:57 a.m.