Mercurial > repos > iuc > dexseq
diff plotdexseq.R @ 10:df929f257179 draft
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/dexseq commit 2ea27822b171dbf519509dc1da150c8ccee2a140
| author | iuc |
|---|---|
| date | Tue, 04 Apr 2023 08:25:51 +0000 |
| parents | 62adf13b86ea |
| children | 9a7c5b6d8f1e |
line wrap: on
line diff
--- a/plotdexseq.R Tue May 03 20:23:18 2022 +0000 +++ b/plotdexseq.R Tue Apr 04 08:25:51 2023 +0000 @@ -1,6 +1,7 @@ ## Setup R error handling to go to stderr -options(show.error.messages = F, error = function() { - cat(geterrmessage(), file = stderr()); q("no", 1, F) +options(show.error.messages = FALSE, error = function() { + cat(geterrmessage(), file = stderr()) + q("no", 1, FALSE) }) # we need that to not crash galaxy with an UTF8 error on German LC settings. Sys.setlocale("LC_MESSAGES", "en_US.UTF-8") @@ -25,8 +26,8 @@ "names", "a", 1, "logical", "normcounts", "n", 1, "logical", "splicing", "s", 1, "logical" -), byrow = TRUE, ncol = 4); -opt <- getopt(spec); +), byrow = TRUE, ncol = 4) +opt <- getopt(spec) res <- readRDS(opt$rdata)