| Previous changeset 1:7b7303fa20e3 (2018-12-29) Next changeset 3:6d532d760950 (2019-02-12) |
|
Commit message:
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/volcanoplot commit cc2f721e801b6e113a8813982cc3c2c31ae83e89 |
|
modified:
volcanoplot.R |
| b |
| diff -r 7b7303fa20e3 -r d1d39c72b755 volcanoplot.R --- a/volcanoplot.R Sat Dec 29 13:21:24 2018 -0500 +++ b/volcanoplot.R Sun Dec 30 08:03:58 2018 -0500 |
| [ |
| @@ -52,11 +52,11 @@ tolabel <- filter(results, labels %in% labelfile[, 1]) } else if (is.null(opt$top_num)) { # label all significant genes - tolabel <- filter(results, fdr<opt$signif_thresh) + tolabel <- filter(results, sig != label_notsig) } else if (opt$top_num > 0) { # label only top significant genes - tolabel <- filter(results, fdr<opt$signif_thresh) %>% - top_n(n=opt$top_num, Pvalue) + tolabel <- filter(results, sig != label_notsig) %>% + top_n(n=-opt$top_num, Pvalue) } else if (opt$top_num == 0) { # no labels tolabel <- NULL |