tests/testthat/test_assert.R

context("assert")

test_that("assertions work properly", {
  expect_silent(assert(T == T))
  expect_silent(assert(F == F))
  
  expect_error(assert(T == F))
  expect_error(assert(T == T & T == F))
  
  expect_error(assert(NA == T))
})

Try the skillsengineeR package in your browser

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

skillsengineeR documentation built on March 4, 2021, 5:07 p.m.