tests/testthat/test-single_prop_ci.R

test_that("Error message should be given if x < 0", {
  expect_error(single_prop_ci(-1, 100))
})

test_that("Error message should be given if x > n", {
  expect_error(single_prop_ci(101, 100))
})

Try the CIfinder package in your browser

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

CIfinder documentation built on May 29, 2024, 7:19 a.m.