tests/testthat/test_inputhandling.R

context("Check inputs")
library(invctr)

test_that("Rose tinted glasses", {
  expect_equal(suppressWarnings(sqrt(-1))%00%"error", "error")
  expect_equal(Inf%00%0, 0)
  expect_equal(NULL%00%"It's NULL", "It's NULL")
})

Try the invctr package in your browser

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

invctr documentation built on Aug. 16, 2022, 5:18 p.m.