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 Oct. 31, 2024, 1:23 p.m.