BAMFiles <- list.files(system.file("extdata", package="cn.mops"),pattern=".bam$",
full.names=TRUE)
bamDataRanges <- getReadCountsFromBAM(BAMFiles,
sampleNames=paste("Sample",1:3),WL=5000,mode="unpaired")
X <- getReadCountsFromBAM(BAMFiles,
sampleNames=paste("Sample",1:3),WL=5000,mode="unpaired",parallel=2)
Run the code above in your browser using DataLab