Mercurial > repos > artbio > gsc_mannwhitney_de

diff MannWhitney_DE.R @ 3:3d86c89f15bf draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"planemo upload for repository https://github.com/ARTbio/tools-artbio/tree/master/tools/gsc_mannwhitney_de commit fab41058cef186159d746c55808d0e69f252af2f"
author artbio
date Thu, 29 Aug 2019 05:35:04 -0400
parents c67dba545a37
children 6916ac5a9ef0
line wrap: on
line diff
--- a/MannWhitney_DE.R	Mon Jul 01 09:05:28 2019 -0400
+++ b/MannWhitney_DE.R	Thu Aug 29 05:35:04 2019 -0400
@@ -138,9 +138,14 @@
 results <- merge(gene_stats, MW_test, by = "row.names")
 colnames(results)[1] <- "genes"
 
+## Annotate Significant column
+results$Significant[results$Significant == T & !is.na(results$Significant)] <- ifelse(subset(results, Significant == T)$log2FC > 0, "UP", "DOWN")
+results$Significant[results$Significant == F & !is.na(results$Significant)] <- "NS"
+
+
 # Save files
 write.table(
-  results,
+  results[order(results$p.adjust),],
   opt$output,
   sep = "\t",
   quote = F,