Mercurial > repos > iuc > edger

diff edger.R @ 1:2a16413ec60d 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/edger commit 22882a8eabae0dcc15938423852d1325303b0b78
author iuc
date Tue, 30 Jan 2018 04:07:08 -0500
parents 9bdff28ae1b1
children a1634a9c2ee1
line wrap: on
line diff
--- a/edger.R	Tue Nov 07 08:18:14 2017 -0500
+++ b/edger.R	Tue Jan 30 04:07:08 2018 -0500
@@ -486,9 +486,9 @@
     sumStatus <- summary(status)
 
     # Collect counts for differential expression
-    upCount[i] <- sumStatus["1", ]
-    downCount[i] <- sumStatus["-1", ]
-    flatCount[i] <- sumStatus["0", ]
+    upCount[i] <- sumStatus["Up"]
+    downCount[i] <- sumStatus["Down"]
+    flatCount[i] <- sumStatus["NotSig"]
                                              
     # Write top expressions table
     top <- topTags(res, n=Inf, sort.by="PValue")