Mercurial > repos > proteore > proteore_clusterprofiler
diff GO-enrich.R @ 40:25222be4a88b draft
planemo upload commit c9d70181a2b587e53dcc4b5885b74b625def6b8c-dirty
| author | proteore |
|---|---|
| date | Thu, 05 Dec 2019 13:35:24 +0000 |
| parents | 0d954174e0e9 |
| children | 3fd1ccc57a6a |
line wrap: on
line diff
--- a/GO-enrich.R Thu Sep 26 08:59:40 2019 -0400 +++ b/GO-enrich.R Thu Dec 05 13:35:24 2019 +0000 @@ -50,6 +50,9 @@ ont=ontology, level=level, readable=TRUE) + + ggo@result<-ggo@result[order(-ggo@result$Count),] + if (length(ggo@result$ID) > 0 ) { ggo@result$Description <- sapply(as.vector(ggo@result$Description), function(x) {ifelse(nchar(x)>50, substr(x,1,50),x)},USE.NAMES = FALSE)
