Mercurial > repos > iuc > deseq2
diff deseq2.R @ 24:71bacea10eee draft
"planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/deseq2 commit 29f5fd6ec10122f7b241c8d36d648b105ed4275a"
author | iuc |
---|---|
date | Sat, 29 Feb 2020 17:08:08 -0500 |
parents | a6fc9228e1a0 |
children | de44f8eff84a |
line wrap: on
line diff
--- a/deseq2.R Tue Mar 26 06:25:00 2019 -0400 +++ b/deseq2.R Sat Feb 29 17:08:08 2020 -0500 @@ -354,7 +354,7 @@ outDF <- as.data.frame(resSorted) outDF$geneID <- rownames(outDF) outDF <- outDF[,c("geneID", "baseMean", "log2FoldChange", "lfcSE", "stat", "pvalue", "padj")] - filename <- paste0(opt$outfile,".",primaryFactor,"_",lvl,"_vs_",ref) + filename <- paste0(primaryFactor,"_",lvl,"_vs_",ref) write.table(outDF, file=filename, sep="\t", quote=FALSE, row.names=FALSE, col.names=FALSE) if (independentFiltering) { threshold <- unname(attr(res, "filterThreshold"))