I have a question about how reliable results would I get if I ran DESeq2 on about 4000 genes instead of all 17000 genes?
Basically I have two conditions with 2 and 3 replicates each respectively. I ran DESeq2 and got about 4115 differentially expressed up-regulated genes (with Padj < 0.05). Would it make sense if I subset my counts-matrix for these 4000 genes and run DESeq2 on this subset (dataMatrix for 4000 genes only) for other samples and/or conditions?
I did and I got about 51 genes (with Padj < 0.05). Should I not get more genes? what I am trying to ask is that would it make any statistical sense if I only take subset of these genes for other conditions (samples) and do differential expression? would my results be statistically reliable?
here is my code:
countData <- read.table("/Users/mnoon/Desktop/fruit_fly/analysis2/ugr_utgr_gfp/ugr_utgr_gfp_merged_counts.txt",header=TRUE)
head(countData)
gene_4114_list <- read.table("/Users/mnoon/Desktop/fruit_fly/analysis2/ugrInput_ugrvg_upregulated_4114genes.csv",header=TRUE)
head(gene_4114_list)
#Subset 4114 genes to get Read-Counts
subLIST <- merge(gene_4114_list, countData, by.x= "fly_id", by.y= "gene")
head(subLIST)
rownames(subLIST) <- subLIST$fly_id
subLIST <- subLIST[-1]
head(subLIST)
colData<-data.frame(condition=factor(c("UGRgfp", "UGRgfp", "UTGRgfp", "UTGRgfp", "UTGRgfp")))
dds <- DESeqDataSetFromMatrix(countData = subLIST, colData = colData, design = ~ condition)
colData(dds)$condition<-factor(colData(dds)$condition,levels=c("UGRgfp","UTGRgfp"))
dds <- DESeq(dds)
res<-results(dds)
res<-res[order(res$padj),]
head(res)
mcols(res, use.names=TRUE)
#get number of genes filtered with this threshold
sum( res$padj < 0.05, na.rm=TRUE )
Basically I have two conditions with 2 and 3 replicates each respectively. I ran DESeq2 and got about 4115 differentially expressed up-regulated genes (with Padj < 0.05). Would it make sense if I subset my counts-matrix for these 4000 genes and run DESeq2 on this subset (dataMatrix for 4000 genes only) for other samples and/or conditions?
I did and I got about 51 genes (with Padj < 0.05). Should I not get more genes? what I am trying to ask is that would it make any statistical sense if I only take subset of these genes for other conditions (samples) and do differential expression? would my results be statistically reliable?
here is my code:
countData <- read.table("/Users/mnoon/Desktop/fruit_fly/analysis2/ugr_utgr_gfp/ugr_utgr_gfp_merged_counts.txt",header=TRUE)
head(countData)
gene_4114_list <- read.table("/Users/mnoon/Desktop/fruit_fly/analysis2/ugrInput_ugrvg_upregulated_4114genes.csv",header=TRUE)
head(gene_4114_list)
#Subset 4114 genes to get Read-Counts
subLIST <- merge(gene_4114_list, countData, by.x= "fly_id", by.y= "gene")
head(subLIST)
rownames(subLIST) <- subLIST$fly_id
subLIST <- subLIST[-1]
head(subLIST)
colData<-data.frame(condition=factor(c("UGRgfp", "UGRgfp", "UTGRgfp", "UTGRgfp", "UTGRgfp")))
dds <- DESeqDataSetFromMatrix(countData = subLIST, colData = colData, design = ~ condition)
colData(dds)$condition<-factor(colData(dds)$condition,levels=c("UGRgfp","UTGRgfp"))
dds <- DESeq(dds)
res<-results(dds)
res<-res[order(res$padj),]
head(res)
mcols(res, use.names=TRUE)
#get number of genes filtered with this threshold
sum( res$padj < 0.05, na.rm=TRUE )
Comment