Mercurial > repos > proteore > proteore_clusterprofiler

diff GO-enrich.R @ 5:8a91f58782df draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload commit c5f2b4b085a9911d1e4cc8d11367dd0363e626ab-dirty
author proteore
date Fri, 23 Mar 2018 10:01:41 -0400
parents 710414ebb6db
children 5e16cec55146
line wrap: on
line diff
--- a/GO-enrich.R	Tue Mar 20 08:59:51 2018 -0400
+++ b/GO-enrich.R	Fri Mar 23 10:01:41 2018 -0400
@@ -32,7 +32,7 @@
                readable=TRUE)
   name <- paste("GGO.", ontology, ".png", sep = "")
   png(name)
-  p <- barplot(ggo)
+  p <- barplot(ggo, showCategory=10)
   print(p)
   dev.off()
   return(ggo)
@@ -55,7 +55,7 @@
   dev.off()
   dot_name <- paste("EGO.", ontology, ".dot.png", sep = "")
   png(dot_name)
-  p <- dotplot(ego)
+  p <- dotplot(ego, showCategory=10)
   print(p)
   dev.off()
   return(ego)