inst/unitTests/test_testPairedEndBam.R

fl <- system.file("extdata", "ex1.bam", package="Rsamtools")

test_testPairedEndBam <- function() {
    checkTrue(testPairedEndBam(BamFile(fl)))
    checkTrue(testPairedEndBam(fl))
}
Bioconductor/Rsamtools documentation built on Aug. 20, 2024, 2:36 a.m.