## create an RNAseq object
## summarizing 4 bam files by exons
rnaSeq <- easyRNASeq(system.file(
"extdata",
package="RnaSeqTutorial"),
organism="Dmelanogaster",
chr.sizes=as.list(seqlengths(Dmelanogaster)),
readLength=36L,
annotationMethod="rda",
annotationFile=system.file(
"data",
"gAnnot.rda",
package="RnaSeqTutorial"),
format="bam",
count="exons",
pattern="[A,C,T,G]{6}\\.bam$",
outputFormat="RNAseq")
## summing up the exons by transcript
rnaSeq <- transcriptCounts(rnaSeq)
Run the code above in your browser using DataLab