Repository 'rdavidwebservice'
hg clone https://toolshed.g2.bx.psu.edu/repos/iuc/rdavidwebservice

Changeset 0:5aa52484bef2 (2019-05-23)
Commit message:
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/rdavidwebservice commit b664316c8917dff50de40207c2b3104ed850b90b
added:
macros.xml
rdavidwebservice.xml
test-data/demolist1
b
diff -r 000000000000 -r 5aa52484bef2 macros.xml
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/macros.xml Thu May 23 13:44:50 2019 -0400
b
@@ -0,0 +1,44 @@
+<?xml version="1.0"?>
+<macros>
+    <token name="@TOOL_VERSION@">1.20.0</token>
+    <xml name="identifier_options">
+        <option value="AFFYMETRIX_3PRIME_IVT_ID">AFFYMETRIX_3PRIME_IVT_ID</option>
+        <option value="AFFYMETRIX_EXON_ID">AFFYMETRIX_EXON_ID</option>
+        <option value="AGILENT_CHIP_ID">AGILENT_CHIP_ID</option>
+        <option value="AGILENT_ID">AGILENT_ID</option>
+        <option value="AGILENT_OLIGO_ID">AGILENT_OLIGO_ID</option>
+        <option value="APHIDBASE_ID">APHIDBASE_ID</option>
+        <option value="BEEBASE_ID">BEEBASE_ID</option>
+        <option value="BEETLEBASE_ID">BEETLEBASE_ID</option>
+        <option value="BGD_ID">BGD_ID</option>
+        <option value="CGNC_ID">CGNC_ID</option>
+        <option value="CRYPTODB_ID">CRYPTODB_ID</option>
+        <option value="DICTYBASE_ID">DICTYBASE_ID</option>
+        <option value="ENSEMBL_GENE_ID">ENSEMBL_GENE_ID</option>
+        <option value="ENSEMBL_TRANSCRIPT_ID">ENSEMBL_TRANSCRIPT_ID</option>
+        <option value="ENTREZ_GENE_ID" selected="True">ENTREZ_GENE_ID</option>
+        <option value="FLYBASE_GENE_ID">FLYBASE_GENE_ID</option>
+        <option value="GENBANK_ACCESSION">GENBANK_ACCESSION</option>
+        <option value="GENOMIC_GI_ACCESSION">GENOMIC_GI_ACCESSION</option>
+        <option value="GENPEPT_ACCESSION">GENPEPT_ACCESSION</option>
+        <option value="LOCUS_TAG">LOCUS_TAG</option>
+        <option value="MGI_ID">MGI_ID</option>
+        <option value="MIRBASE_ID">MIRBASE_ID</option>
+        <option value="MRNA_GI_ACCESSION">MRNA_GI_ACCESSION</option>
+        <option value="NASONIABASE_ID">NASONIABASE_ID</option>
+        <option value="PROTEIN_GI_ACCESSION">PROTEIN_GI_ACCESSION</option>
+        <option value="PSEUDOCAP_ID">PSEUDOCAP_ID</option>
+        <option value="REFSEQ_MRNA">REFSEQ_MRNA</option>
+        <option value="REFSEQ_PROTEIN">REFSEQ_PROTEIN</option>
+        <option value="RGD_ID">RGD_ID</option>
+        <option value="SGD_ID">SGD_ID</option>
+        <option value="TAIR_ID">TAIR_ID</option>
+        <option value="UNIGENE">UNIGENE</option>
+        <option value="UNIPROT_ACCESSION">UNIPROT_ACCESSION</option>
+        <option value="UNIPROT_ID">UNIPROT_ID</option>
+        <option value="VECTORBASE_ID">VECTORBASE_ID</option>
+        <option value="WORMBASE_GENE_ID">WORMBASE_GENE_ID</option>
+        <option value="XENBASE_ID">XENBASE_ID</option>
+        <option value="ZFIN_ID">ZFIN_ID</option>
+ </xml>
+</macros>
\ No newline at end of file
b
diff -r 000000000000 -r 5aa52484bef2 rdavidwebservice.xml
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/rdavidwebservice.xml Thu May 23 13:44:50 2019 -0400
[
b'@@ -0,0 +1,372 @@\n+<tool id="rdavidwebservice" name="RDAVIDWebService" version="@TOOL_VERSION@">\n+    <description>\n+        Run functional annotation using DAVID \n+    </description>\n+    <macros>\n+        <import>macros.xml</import>\n+    </macros>\n+    <requirements>\n+        <requirement type="package" version="@TOOL_VERSION@">bioconductor-rdavidwebservice</requirement>\n+    </requirements>\n+    <command detect_errors="exit_code"><![CDATA[\n+cat \'$script\' &&\n+Rscript \'$script\'\n+    ]]></command>\n+    <configfiles>\n+        <configfile name="script"><![CDATA[\n+## Setup R error handling to go to stderr\n+options(show.error.messages=F, error=function(){cat(geterrmessage(), file=stderr()); q("no",1,F)})\n+## Unify locale settings\n+loc <- Sys.setlocale("LC_MESSAGES", "C.UTF-8")\n+## Import libraries\n+library(RDAVIDWebService)\n+\n+gene_list <- scan(\'$input1\', what="character")\n+gene_identifier_type <- \'$identifier1\'\n+\n+#if str(\'$__user_email__\') != "":\n+email <- \'$__user_email__\'\n+#else:\n+email <- \'galaxy_user@galaxy.org\'\n+#end if\n+\n+david <- DAVIDWebService(email=email, url="https://david.ncifcrf.gov/webservice/services/DAVIDWebService.DAVIDWebServiceHttpSoap12Endpoint/")\n+\n+geneList <- addList(david, gene_list, idType=gene_identifier_type,\n+                    listName="genelist", listType="Gene")\n+\n+#if str($background.background_selector) == "with_background":\n+background_list <- scan(\'$background.input2\', what="character")\n+background_identifier_type <- \'$background.identifier2\'\n+background <- addList(david, background_list, idType=background_identifier_type,\n+        listName="backgroundlist",listType="Background")\n+#end if\n+\n+#if str($AnnotationCategories.setAnnotationCategories) == "Yes":   \n+annocategories <- c(\'$AnnotationCategories.Disease\', \'$AnnotationCategories.Functional_Categories\', \'$AnnotationCategories.Gene_Ontology\', \'$AnnotationCategories.General_Annotations\', \'$AnnotationCategories.Literature\', \'$AnnotationCategories.Main_Accessions\', \'$AnnotationCategories.Pathways\', \'$AnnotationCategories.Protein_Domains\', \'$AnnotationCategories.Tissue_Expression\')\n+annocategories <- annocategories[annocategories != \'None\']\n+annocategories <- unlist(strsplit(annocategories, split = ","))              \n+setAnnotationCategories(david, annocategories)\n+#end if\n+\n+#if str($FunctionalAnnotationCluster.set_FACluster_params) == "Yes":   \n+getClusterReportFile(david, \'$output1\', \n+    kappa = as.integer(\'$FunctionalAnnotationCluster.kappa\'), \n+    overlap = as.integer(\'$FunctionalAnnotationCluster.overlap\'), \n+    initialSeed = as.integer(\'$FunctionalAnnotationCluster.initialSeed\'), \n+    finalSeed = as.integer(\'$FunctionalAnnotationCluster.finalSeed\'), \n+    linkage = as.double(\'$FunctionalAnnotationCluster.linkage\'))\n+#end if\n+\n+#if str($FunctionalAnnotationChart.set_FAChart_params) == "Yes" : \n+getFunctionalAnnotationChartFile(david, \'$output2\', \n+    count = as.integer(\'$FunctionalAnnotationChart.count\'), \n+    threshold = as.double(\'$FunctionalAnnotationChart.threshold\'))\n+#end if \n+\n+#if str($FunctionalAnnotationTable.set_FATable_params) == "Yes": \n+getFunctionalAnnotationTableFile(david, \'$output3\')\n+#end if  \n+\n+#if str($GeneListReport.set_GLReport_params) == "Yes": \n+getGeneListReportFile(david, \'$output4\')\n+#end if \n+        ]]></configfile>\n+    </configfiles>\n+    <inputs>\n+        <param name="input1" type="data" format="txt" label="Select gene list"/>\n+        <param name="identifier1" type="select" label="Select gene list identifier type">\n+            <expand macro="identifier_options" />\n+        </param>\n+        <param name="email" type="text" label="I acknowledge that this services will send my galaxy_user email address to an external service: DAVIDWebService. Please confirm with \'yes\'." help="E-Mail has to be registered at https://david.ncifcrf.gov/webservice/register.htm in order to get access to DAVID (webservice)">\n+            <validator type="regex" message="You need to agree the terms to continue by typing \''..b'ter>FunctionalAnnotationChart[\'set_FAChart_params\'] == \'Yes\'</filter>\n+        </data>\n+        <data name="output3" format="tabular" label="${tool.name} on ${on_string}: Functional Annotation Table">\n+            <filter>FunctionalAnnotationTable[\'set_FATable_params\'] == \'Yes\'</filter>\n+        </data>\n+        <data name="output4" format="tabular" label="${tool.name} on ${on_string}: Gene List Report">\n+            <filter>GeneListReport[\'set_GLReport_params\'] == \'Yes\'</filter>\n+        </data>\n+    </outputs>\n+    <tests>\n+        <test>\n+            <param name="input1" value="demolist1" ftype="tabular"/>\n+            <param name="identifier1" value="AFFYMETRIX_3PRIME_IVT_ID"/>\n+            <param name="email" value="yes"/>\n+            <conditional name="AnnotationCategories">\n+                <param name="setAnnotationCategories" value="with_AnnotationCategories"/>\n+                <param name="Disease" value="GAD_DISEASE,GAD_DISEASE_CLASS,OMIM_DISEASE"/>\n+                <param name="Gene_Ontology" value="GOTERM_MF_FAT,GOTERM_CC_FAT,GOTERM_BP_FAT"/>\n+                <param name="Pathways" value="KEGG_PATHWAY"/>\n+            </conditional>\n+            <conditional name="FunctionalAnnotationCluster">\n+                <param name="set_FACluster_params" value="Yes"/>\n+            </conditional>  \n+            <conditional name="FunctionalAnnotationChart">\n+                <param name="set_FAChart_params" value="Yes"/>\n+            </conditional>\n+            <conditional name="FunctionalAnnotationTable">\n+                <param name="set_FATable_params" value="Yes"/>\n+            </conditional>\n+            <conditional name="GeneListReport">\n+                <param name="set_GLReport_params" value="Yes"/>\n+            </conditional>\n+            <output name="output1">\n+                <assert_contents>\n+                    <has_text_matching expression="Annotation Cluster 1&#009;Enrichment Score: \\d*\\.*\\d*"/>\n+                </assert_contents>\n+            </output>\n+            <output name="output2">\n+                <assert_contents>\n+                    <has_line_matching expression="Category&#009;Term&#009;Count&#009;%&#009;PValue&#009;Genes&#009;List Total&#009;Pop Hits&#009;Pop Total&#009;Fold Enrichment&#009;Bonferroni&#009;Benjamini&#009;FDR"/>\n+                </assert_contents>\n+            </output>\n+            <output name="output3">\n+                <assert_contents>\n+                    <has_line_matching expression="ID&#009;Gene Name&#009;Species&#009;BBID&#009;BIOCARTA&#009;COG_ONTOLOGY&#009;GOTERM_BP_DIRECT&#009;GOTERM_CC_DIRECT&#009;GOTERM_MF_DIRECT&#009;INTERPRO&#009;KEGG_PATHWAY&#009;OMIM_DISEASE&#009;PIR_SUPERFAMILY&#009;SMART&#009;UP_KEYWORDS&#009;UP_SEQ_FEATURE"/>\n+                </assert_contents>\n+            </output>\n+            <output name="output4">\n+                <assert_contents>\n+                    <has_line_matching expression="ID&#009;Name&#009;Species"/>\n+                </assert_contents>\n+            </output>\n+        </test>\n+    </tests>\n+    <help><![CDATA[\n+**What it does**\n+\n+Retrieve data from the Database for Annotation, Visualization and Integrated Discovery (DAVID) using Web Services into R objects. This tool offers the main functionalities of DAVID website including: \n+\n+i) user-friendly connectivity to upload gene/background list/s, change gene/background position \n+\n+ii) Reports of the submitted Gene List, Gene/Term Clusters, Functional Annotation Chart, Functional Annotation Table\n+\n+\n+**Links and registration**\n+\n+http://david.abcc.ncifcrf.gov/ and\n+https://bioconductor.org/packages/release/bioc/html/RDAVIDWebService.html\n+\n+The used e-mail address has to be registered at https://david.ncifcrf.gov/webservice/register.htm in order to get access to DAVID (WebService)\n+\n+    ]]></help>\n+     <citations>\n+        <citation type="doi">10.1093/bioinformatics/btt487</citation>\n+        <citation type="doi">10.1038/nprot.2008.211</citation>\n+    </citations>\n+</tool>\n'
b
diff -r 000000000000 -r 5aa52484bef2 test-data/demolist1
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/test-data/demolist1 Thu May 23 13:44:50 2019 -0400
b
@@ -0,0 +1,164 @@
+1112_g_at
+1331_s_at
+1355_g_at
+1372_at
+1391_s_at
+1403_s_at
+1419_g_at
+1575_at
+1645_at
+1786_at
+1855_at
+1890_at
+1901_s_at
+1910_s_at
+1974_s_at
+1983_at
+2090_i_at
+31506_s_at
+31512_at
+31525_s_at
+31621_s_at
+31687_f_at
+31715_at
+31793_at
+32073_at
+32084_at
+32148_at
+32163_f_at
+32250_at
+32279_at
+32413_at
+32418_at
+32439_at
+32469_at
+32680_at
+32717_at
+33027_at
+33080_s_at
+33284_at
+33293_at
+33371_s_at
+33516_at
+33530_at
+33684_at
+33685_at
+33922_at
+33963_at
+33979_at
+34012_at
+34233_i_at
+34249_at
+34436_at
+34453_at
+34467_g_at
+34539_at
+34546_at
+34577_at
+34606_s_at
+34618_at
+34623_at
+34629_at
+34636_at
+34702_f_at
+34703_f_at
+34720_at
+34972_s_at
+35038_at
+35069_at
+35090_g_at
+35091_at
+35121_at
+35169_at
+35213_at
+35367_at
+35373_at
+35439_at
+35566_f_at
+35595_at
+35648_at
+35896_at
+35903_at
+35915_at
+35956_s_at
+36234_at
+36317_at
+36328_at
+36378_at
+36436_at
+36479_at
+36703_at
+36713_at
+36766_at
+37061_at
+37096_at
+37097_at
+37105_at
+37166_at
+37172_at
+37408_at
+37454_at
+37711_at
+37814_g_at
+37898_r_at
+37905_r_at
+37953_s_at
+37954_at
+37968_at
+37983_at
+38103_at
+38128_at
+38201_at
+38229_at
+38236_at
+38482_at
+38508_s_at
+38604_at
+38646_s_at
+38674_at
+38691_s_at
+38816_at
+38945_at
+38948_at
+39094_at
+39187_at
+39198_s_at
+39469_s_at
+39511_at
+39698_at
+39908_at
+40058_s_at
+40089_at
+40186_at
+40271_at
+40294_at
+40317_at
+40350_at
+40735_at
+40790_at
+40959_at
+41113_at
+41280_r_at
+41489_at
+606_at
+679_at
+822_s_at
+919_at
+936_s_at
+966_at
+967_g_at
+32010_at
+33077_at
+36696_at
+36421_at
+31987_at
+35996_at
+38926_at
+33246_at
+40553_at
+41703_r_at
+34902_at
+32407_f_at
+34529_at
+31576_at
+1937_at