Mercurial > repos > iuc > deseq2

diff deseq2.R @ 24:71bacea10eee draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"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"))