tests/testthat/test-coercion.R

context("type coercion")

test_that("type coercion works", {
  x <- as.logical(rvbern(prob = 0.5))
  expect_s3_class(x, "rv")
})
jsta/rv documentation built on Feb. 12, 2022, 5:13 p.m.