Mercurial > repos > galaxyp > custom_pro_db_annotation_data_manager
annotate data_manager/customProDB_annotation.R @ 1:4c77cf5a2977 draft
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
author | galaxyp |
---|---|
date | Mon, 25 Jan 2016 18:00:15 -0500 |
parents | 663ee21a8609 |
children | 20a1b026b798 |
rev | line source |
---|---|
0
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
1 #!/usr/bin/env Rscript |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
2 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
3 initial.options <- commandArgs(trailingOnly = FALSE) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
4 script_parent_dir <- dirname(sub("--file=", "", initial.options[grep("--file=", initial.options)])) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
5 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
6 ## begin warning handler |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
7 withCallingHandlers({ |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
8 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
9 library(methods) # Because Rscript does not always do this |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
10 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
11 options('useFancyQuotes' = FALSE) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
12 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
13 suppressPackageStartupMessages(library("optparse")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
14 suppressPackageStartupMessages(library("RGalaxy")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
15 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
16 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
17 option_list <- list() |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
18 option_list$dbkey <- make_option('--dbkey', type='character') |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
19 option_list$outputFile <- make_option('--outputFile', type='character') |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
20 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
21 opt <- parse_args(OptionParser(option_list=option_list)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
22 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
23 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
24 customProDB_annotation <- function( |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
25 dbkey = GalaxyCharacterParam(required=TRUE), |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
26 outputFile = GalaxyOutput("output","json")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
27 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
28 if (!file.exists(outputFile)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
29 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
30 gstop("json params file does not exist") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
31 } |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
32 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
33 suppressPackageStartupMessages(library(rjson)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
34 params = fromJSON(file=outputFile) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
35 target_directory = params$output_data[[1]]$extra_files_path |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
36 data_description = params$param_dict$advanced$data_description |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
37 data_id = params$param_dict$advanced$data_id |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
38 dir.create(target_directory) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
39 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
40 tryCatch( |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
41 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
42 #file.remove(outputFile) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
43 }, error=function(err) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
44 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
45 gstop("failed to remove json params file after reading") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
46 }) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
47 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
48 ucscTableCodingFastaURL = paste("http://genome.ucsc.edu/cgi-bin/hgTables?db=", dbkey, "&hgSeq.cdsExon=on&hgSeq.granularity=gene&hgSeq.casing=exon&hgSeq.repMasking=lower&hgta_doGenomicDna=get+sequence&hgta_group=genes&hgta_track=refGene&hgta_table=refGene&hgta_regionType=genome", sep="") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
49 ucscTableProteinFastaURL = paste("http://genome.ucsc.edu/cgi-bin/hgTables?db=", dbkey, "&hgta_geneSeqType=protein&hgta_doGenePredSequence=submit&hgta_track=refGene&hgta_table=refGene", sep="") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
50 codingFastaFilepath = paste(target_directory, "/", dbkey, ".cds.fa", sep="") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
51 proteinFastaFilepath = paste(target_directory, "/", dbkey, ".protein.fa", sep="") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
52 suppressPackageStartupMessages(library(customProDB)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
53 options(timeout=3600) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
54 cat(paste("Downloading coding FASTA from:", ucscTableCodingFastaURL, "\n")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
55 download.file(ucscTableCodingFastaURL, codingFastaFilepath, quiet=T, mode='wb') |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
56 cat(paste("Downloading protein FASTA from:", ucscTableProteinFastaURL, "\n")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
57 download.file(ucscTableProteinFastaURL, proteinFastaFilepath, quiet=T, mode='wb') |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
58 customProDB::PrepareAnnotationRefseq(genome=dbkey, CDSfasta=codingFastaFilepath, pepfasta=proteinFastaFilepath, annotation_path=target_directory) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
59 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
60 outputPath = paste("customProDB/", dbkey, sep="") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
61 output = list(data_tables = list()) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
62 output[["data_tables"]][["customProDB"]]=c(path=outputPath, name=dbkey, value=dbkey) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
63 write(toJSON(output), file=outputFile) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
64 } |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
65 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
66 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
67 params <- list() |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
68 for(param in names(opt)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
69 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
70 if (!param == "help") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
71 params[param] <- opt[param] |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
72 } |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
73 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
74 setClass("GalaxyRemoteError", contains="character") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
75 wrappedFunction <- function(f) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
76 { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
77 tryCatch(do.call(f, params), |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
78 error=function(e) new("GalaxyRemoteError", conditionMessage(e))) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
79 } |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
80 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
81 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
82 suppressPackageStartupMessages(library(RGalaxy)) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
83 do.call(customProDB_annotation, params) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
84 |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
85 ## end warning handler |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
86 }, warning = function(w) { |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
87 cat(paste("Warning:", conditionMessage(w), "\n")) |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
88 invokeRestart("muffleWarning") |
663ee21a8609
planemo upload for repository https://github.com/galaxyproteomics/tools-galaxyp/tools/bumbershoot/data_manager_customProDB commit 141369f97aa2804d2bbfd9ed620ea2a5574994c2-dirty
galaxyp
parents:
diff
changeset
|
89 }) |