tests/testthat/test-ncappc.R

context("Check ncappc")

test_that("Check if ncappc is available",{
  expect_true(exists("ncappc"), TRUE)
  source("ncappcexamples/example1.R")
  expect_equal(sum(TIME),sum(TIME.positive))
  expect_equal(sum(CONC),sum(CONC.positive))
})
cacha0227/ncappc documentation built on Nov. 14, 2020, 9:09 a.m.