bam <- system.file("extdata",
"wgEncodeCaltechRnaSeqGm12878R1x75dAlignsRep2V2_duprm.bam",
package="dupRadar")
gtf <- system.file("extdata","genes.gtf",package="dupRadar")
stranded <- 2 # '0' (unstranded), '1' (stranded) and '2' (reverse)
paired <- FALSE
threads <- 4
# call the duplicate marker and analyze the reads
dm <- analyzeDuprates(bam,gtf,stranded,paired,threads)
Run the code above in your browser using DataLab