tests/testthat/test-bed.R

library(ChIPseeker)

context("bed file")

test_that("parse bed file", {
    files <- getSampleFiles()
    for (i in seq_along(files)) {
        expect_true(is(readPeakFile(files[[i]]), "GRanges"))
    }
})
YuLab-SMU/ChIPseeker documentation built on July 29, 2024, 7:20 p.m.