library(Rsamtools)
library(GenomicFeatures)
library(GenomicAlignments)
gtfFile = "Drosophila_melanogaster/Ensembl/BDGP6/Annotation/Genes/genes.gtf"
txdb = makeTxDbFromGFF(gtfFile, format="gtf")
genes = exonsBy(txdb, by="gene")
dirActualData = paste(getwd(),"/",sep="")
sampleTableSingle = read.table("BamSingle.txt")
fls = paste(dirActualData,sampleTableSingle[,1],sep="")
bamLst = BamFileList(fls, index=character(),yieldSize=100000,obeyQname=TRUE)
PRJNA266927 = summarizeOverlaps(features = genes,read=bamLst,
mode="Union",
singleEnd=TRUE,
ignore.strand=TRUE,
fragments=FALSE)
Run = c("SRR1656855","SRR1656856","SRR1656857","SRR1656858","SRR1656859","SRR1656860",
"SRR1656861","SRR1656862")
Treatment = c(1,1,2,2,3,3,4,4)
Treatment = factor(Treatment,levels=1:4,labels=c("NC","NOTCH","ESG","TUMOR"))
colData(PRJNA266927) = DataFrame(Treatment)
save(PRJNA266927,file="PRJNA266927.rda")