tests/testthat/test_PCIT.R

context("PCIT")

data('simNorm')

test_that("PCIT", {
  expect_true(is.list(PCIT(simNorm[1:10, ])))
})

Try the CeTF package in your browser

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

CeTF documentation built on Nov. 25, 2020, 2 a.m.