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 Feb. 11, 2024, 5:22 p.m.