inst/unitTests/test_testPairedEndBam.R

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

test_testPairedEndBam <- function() {
    checkTrue(testPairedEndBam(BamFile(fl)))
    checkTrue(testPairedEndBam(fl))
}

Try the Rsamtools package in your browser

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

Rsamtools documentation built on Nov. 8, 2020, 8:11 p.m.