tests/testthat/test-spectraltad.R

context("test-spectraltad")

test_that("TAD calling works", {
  data("rao_chr20_25_rep")
  expect_equal(nrow(SpectralTAD(rao_chr20_25_rep, "chr20")$Level_1), 165)
})

Try the SpectralTAD package in your browser

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

SpectralTAD documentation built on Nov. 8, 2020, 8:29 p.m.