tests/testthat/test_Testing.R

context("DChIPRep testing test")

test_that("runTesting_works", {
  data(testData)
  dcr <- DChIPRepResults(testData)
  dcr <- runTesting(dcr)
  expect_is(resultsDChIPRep(dcr), "data.frame")
  expect_is(FDRresults(dcr),"list")
})
b-klaus/DChIPRep documentation built on May 14, 2019, 11:15 a.m.