annotate rgToolFactory.xml @ 40:8603867451d8 draft

Uploaded
author fubar
date Thu, 28 Aug 2014 06:18:31 -0400
parents 64f7bd086146
children 8d28e32c71ff
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
40
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
1 <tool id="rgTF" name="Tool Factory" version="1.11">
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
2 <description>Makes scripts into tools</description>
39
64f7bd086146 Uploaded
fubar
parents:
diff changeset
3 <requirements>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
4 <requirement type="package" version="9.10">ghostscript</requirement>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
5 <requirement type="package" version="1.3.20">graphicsmagick</requirement>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
6 </requirements>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
7 <command interpreter="python">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
8 #if ( $__user_email__ not in $__admin_users__ ):
64f7bd086146 Uploaded
fubar
parents:
diff changeset
9 rgToolFactory.py --bad_user $__user_email__
64f7bd086146 Uploaded
fubar
parents:
diff changeset
10 #else:
64f7bd086146 Uploaded
fubar
parents:
diff changeset
11 rgToolFactory.py --script_path "$runme" --interpreter "$interpreter"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
12 --tool_name "$tool_name" --user_email "$__user_email__"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
13 #if $make_TAB.value=="yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
14 --output_tab "$tab_file"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
15 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
16 #if $makeMode.make_Tool=="yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
17 --make_Tool "$makeMode.make_Tool"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
18 --tool_desc "$makeMode.tool_desc"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
19 --tool_version "$makeMode.tool_version"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
20 --new_tool "$new_tool"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
21 --help_text "$helpme"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
22 #if $make_HTML.value=="yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
23 #if makeMode.include.deps.value=="yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
24 --include_dependencies "yes"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
25 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
26 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
27 --citations "$citeme"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
28 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
29 #if $make_HTML.value=="yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
30 --output_dir "$html_file.files_path" --output_html "$html_file" --make_HTML "yes"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
31 #else:
64f7bd086146 Uploaded
fubar
parents:
diff changeset
32 --output_dir "."
64f7bd086146 Uploaded
fubar
parents:
diff changeset
33 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
34 #if $input1 != 'None':
64f7bd086146 Uploaded
fubar
parents:
diff changeset
35 --input_tab "$input1"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
36 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
37 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
38 </command>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
39 <inputs>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
40 <param name="input1" type="data" label="Select an input file from your history" optional="true" size="120"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
41 help="Most scripts will need an input - your script MUST be ready for whatever format you choose"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
42 <param name="tool_name" type="text" value="My dynamic script" label="New tool ID and title for outputs" size="60"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
43 help="This will become the toolshed repository name so please choose thoughtfully to avoid namespace clashes with other tool writers">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
44 <sanitizer invalid_char="">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
45 <valid initial="string.letters,string.digits"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
46 </sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
47 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
48 <conditional name="makeMode">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
49 <param name="make_Tool" type="select" label="Create a tar.gz file ready for local toolshed entry" help="Ready to deploy securely!" size="60">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
50 <option value="yes">Generate a Galaxy ToolShed compatible toolshed.gz</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
51 <option value="" selected="true">No. Just run the script please</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
52 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
53 <when value = "yes">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
54 <param name="tool_version" label="Tool Version - bump this to warn users trying to redo old analyses" type="text" value="0.01"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
55 help="If you change your script and regenerate the 'same' tool, you should inform Galaxy (and users) by changing (bumping is traditional) this number"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
56 <param name="tool_desc" label="Tool Description" type="text" value="" size="40"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
57 help="Supply a brief tool description for the Galaxy tool menu entry (optional - appears after the tool name)" />
64f7bd086146 Uploaded
fubar
parents:
diff changeset
58 <param name="help_text" label="Tool form documentation and help text for users" type="text" area="true"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
59 size="8x120" value="**What it Does**"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
60 help="Supply the brief user documentation to appear on the new tool form as reStructured text - http://docutils.sourceforge.net/docs/ref/rst/restructuredtext.html" >
64f7bd086146 Uploaded
fubar
parents:
diff changeset
61 <sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
62 <valid initial="string.printable">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
63 </valid>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
64 <mapping initial="none"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
65 </sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
66 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
67 <param name="include_deps" type="select" label="Include ghostscript and graphicsmagick dependencies in generated tool" size="60"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
68 help="If an HTML file is being created, including dependencies is recommended. Otherwise this setting has no effect">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
69 <option value="">Rely on system ghostscript and graphicsmagick rather than include these as dependencies</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
70 <option value="yes" selected="true">Include dependencies so target installations will always work if HTML is being generated</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
71 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
72 <repeat name="citations" title="Citation">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
73 <conditional name="citation_type">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
74 <param name="type" type="select" label="Citation Type">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
75 <option value="doi">DOI</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
76 <option value="bibtex">BibTeX</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
77 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
78 <when value="doi">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
79 <param name="doi" label="DOI" type="text" value=""
64f7bd086146 Uploaded
fubar
parents:
diff changeset
80 help="Supply a DOI (e.g. 10.1111/j.1740-9713.2007.00258.x) that should be cited when this tool is used in published research." />
64f7bd086146 Uploaded
fubar
parents:
diff changeset
81 </when>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
82 <when value="bibtex">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
83 <param name="bibtex" label="BibTex" type="text" area="true"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
84 size="8x120" help="Supply a BibTex entry that should be cited when this tool is used in published research." value="" >
64f7bd086146 Uploaded
fubar
parents:
diff changeset
85 <sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
86 <valid initial="string.printable">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
87 </valid>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
88 <mapping initial="none"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
89 </sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
90 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
91 </when>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
92 </conditional>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
93 </repeat>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
94 </when>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
95 <when value = "">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
96 </when>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
97 </conditional>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
98 <param name="make_HTML" type="select" label="Create an HTML report with links to all output files and thumbnail links to PDF images" size="60"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
99 help="Recommended for presenting complex outputs in an accessible manner. Turn off for simple tools so they just create one output">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
100 <option value="yes">Yes, arrange all outputs produced by my script as an HTML output</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
101 <option value="" selected="true">No, no HTML output file thanks</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
102 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
103 <param name="make_TAB" type="select" label="Create a new (default tabular) history output with or without an HTML file specified above"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
104 help="This is useful if your script creates a single new tabular file you want to appear in the history after the tool executes">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
105 <option value="yes" selected="true">My script writes to a new history output</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
106 <option value="">I do not want a new history output file</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
107 </param>
40
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
108 <param name="out_format" type="select" label="Select the datatype that your tool/script produces" help="If your datatype is not listed here, it has to be added in galaxy's datatypes_conf.xml">
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
109 <options from_parameter="tool.app.datatypes_registry.upload_file_formats">
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
110 <column name="value" index="0"/>
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
111 </options>
39
64f7bd086146 Uploaded
fubar
parents:
diff changeset
112 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
113 <param name="interpreter" type="select" label="Select the interpreter for your code. This must be available on the path of the execution host">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
114 <option value="Rscript" selected="true">Rscript</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
115 <option value="python">python</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
116 <option value="perl">perl</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
117 <option value="sh">sh</option>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
118 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
119 <param name="dynScript" label="Cut and paste the script to be executed here" type="text" value="" area="True" size="8x120"
64f7bd086146 Uploaded
fubar
parents:
diff changeset
120 help="Script must deal with two command line parameters: Path to input tabular file path (or 'None' if none selected) and path to output tabular history file (or 'None').">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
121 <sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
122 <valid initial="string.printable">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
123 </valid>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
124 <mapping initial="none"/>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
125 </sanitizer>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
126 </param>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
127 </inputs>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
128 <outputs>
40
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
129 <data format="input" name="tab_file" label="${tool_name}.${out_format}">
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
130 <filter>make_TAB == "yes"</filter>
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
131 <actions>
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
132 <action type="format">
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
133 <option type="from_param" name="out_format" />
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
134 </action>
8603867451d8 Uploaded
fubar
parents: 39
diff changeset
135 </actions>
39
64f7bd086146 Uploaded
fubar
parents:
diff changeset
136 </data>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
137 <data format="html" name="html_file" label="${tool_name}.html">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
138 <filter>make_HTML == "yes"</filter>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
139 </data>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
140 <data format="toolshed.gz" name="new_tool" label="${tool_name}.toolshed.gz">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
141 <filter>makeMode['make_Tool'] == "yes"</filter>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
142 </data>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
143 </outputs>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
144 <configfiles>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
145 <configfile name="runme">$dynScript</configfile>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
146 <configfile name="helpme">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
147 #if $makeMode.make_Tool == "yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
148 ${makeMode.help_text}
64f7bd086146 Uploaded
fubar
parents:
diff changeset
149 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
150 </configfile>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
151 <configfile name="citeme">
64f7bd086146 Uploaded
fubar
parents:
diff changeset
152 #if $makeMode.make_Tool == "yes":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
153 #for $citation in $makeMode.citations:
64f7bd086146 Uploaded
fubar
parents:
diff changeset
154 #if $citation.citation_type.type == "bibtex":
64f7bd086146 Uploaded
fubar
parents:
diff changeset
155 **ENTRY**bibtex
64f7bd086146 Uploaded
fubar
parents:
diff changeset
156 ${citation.citation_type.bibtex}
64f7bd086146 Uploaded
fubar
parents:
diff changeset
157 #else
64f7bd086146 Uploaded
fubar
parents:
diff changeset
158 **ENTRY**doi
64f7bd086146 Uploaded
fubar
parents:
diff changeset
159 ${citation.citation_type.doi}
64f7bd086146 Uploaded
fubar
parents:
diff changeset
160 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
161 #end for
64f7bd086146 Uploaded
fubar
parents:
diff changeset
162 #end if
64f7bd086146 Uploaded
fubar
parents:
diff changeset
163 </configfile>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
164 </configfiles>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
165 <help>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
166
64f7bd086146 Uploaded
fubar
parents:
diff changeset
167 .. class:: warningmark
64f7bd086146 Uploaded
fubar
parents:
diff changeset
168
64f7bd086146 Uploaded
fubar
parents:
diff changeset
169 **Details and attribution** GTF_
64f7bd086146 Uploaded
fubar
parents:
diff changeset
170
64f7bd086146 Uploaded
fubar
parents:
diff changeset
171 **Local Admins ONLY** Only users whose IDs found in the local admin_user configuration setting in universe_wsgi.ini can run this tool.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
172
64f7bd086146 Uploaded
fubar
parents:
diff changeset
173 **If you find a bug** please raise an issue at the bitbucket repository GTFI_
64f7bd086146 Uploaded
fubar
parents:
diff changeset
174
64f7bd086146 Uploaded
fubar
parents:
diff changeset
175 **What it does** This tool enables a user to paste and submit an arbitrary R/python/perl script to Galaxy.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
176
64f7bd086146 Uploaded
fubar
parents:
diff changeset
177 **Input options** This version is limited to simple transformation or reporting requiring only a single input file selected from the history.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
178
64f7bd086146 Uploaded
fubar
parents:
diff changeset
179 **Output options** Optional script outputs include one single new history tabular file, or for scripts that create multiple outputs,
64f7bd086146 Uploaded
fubar
parents:
diff changeset
180 a new HTML report linking all the files and images created by the script can be automatically generated.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
181
64f7bd086146 Uploaded
fubar
parents:
diff changeset
182 **Tool Generation option** Once the script is working with test data, this tool will optionally generate a new Galaxy tool in a gzip file
64f7bd086146 Uploaded
fubar
parents:
diff changeset
183 ready to upload to your local toolshed for sharing and installation. Provide a small sample input when you run generate the tool because
64f7bd086146 Uploaded
fubar
parents:
diff changeset
184 it will become the input for the generated functional test.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
185
64f7bd086146 Uploaded
fubar
parents:
diff changeset
186 .. class:: warningmark
64f7bd086146 Uploaded
fubar
parents:
diff changeset
187
64f7bd086146 Uploaded
fubar
parents:
diff changeset
188 **Note to system administrators** This tool offers *NO* built in protection against malicious scripts. It should only be installed on private/personnal Galaxy instances.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
189 Admin_users will have the power to do anything they want as the Galaxy user if you install this tool.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
190
64f7bd086146 Uploaded
fubar
parents:
diff changeset
191 .. class:: warningmark
64f7bd086146 Uploaded
fubar
parents:
diff changeset
192
64f7bd086146 Uploaded
fubar
parents:
diff changeset
193 **Use on public servers** is STRONGLY discouraged for obvious reasons
64f7bd086146 Uploaded
fubar
parents:
diff changeset
194
64f7bd086146 Uploaded
fubar
parents:
diff changeset
195 The tools generated by this tool will run just as securely as any other normal installed Galaxy tool but like any other new tools, should always be checked carefully before installation.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
196 We recommend that you follow the good code hygiene practices associated with safe toolshed.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
197
64f7bd086146 Uploaded
fubar
parents:
diff changeset
198 **Scripting conventions** The pasted script will be executed with the path to the (optional) input tabular data file path or NONE if you do not select one, and the path to the optional
64f7bd086146 Uploaded
fubar
parents:
diff changeset
199 output file or None if none is wanted, as the first and second command line parameters. The script must deal appropriately with these - see Rscript examples below.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
200 Note that if an optional HTML output is selected, all the output files created by the script will be nicely presented as links, with pdf images linked as thumbnails in that output.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
201 This can be handy for complex scripts creating lots of output.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
202
64f7bd086146 Uploaded
fubar
parents:
diff changeset
203 **Examples**
64f7bd086146 Uploaded
fubar
parents:
diff changeset
204 <![CDATA[
64f7bd086146 Uploaded
fubar
parents:
diff changeset
205
64f7bd086146 Uploaded
fubar
parents:
diff changeset
206 Each of these following trivial examples can be cut and pasted into the script box for testing.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
207 Please make sure you choose the appropriate interpreter and upload and select a suitable small matching test data input
64f7bd086146 Uploaded
fubar
parents:
diff changeset
208
64f7bd086146 Uploaded
fubar
parents:
diff changeset
209 A simple Rscript "filter" showing how the command line parameters can be handled, takes an input file, does something (transpose in this case) and
64f7bd086146 Uploaded
fubar
parents:
diff changeset
210 writes the results to a new tabular file. Note the use of colClasses to ensure that no fiddling takes place with numeric values by treating everything
64f7bd086146 Uploaded
fubar
parents:
diff changeset
211 as a string::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
212
64f7bd086146 Uploaded
fubar
parents:
diff changeset
213 # transpose a tabular input file and write as a tabular output file
64f7bd086146 Uploaded
fubar
parents:
diff changeset
214 ourargs = commandArgs(TRUE)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
215 inf = ourargs[1]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
216 outf = ourargs[2]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
217 inp = read.table(inf,head=F,row.names=NULL,sep='\t',colClasses="character")
64f7bd086146 Uploaded
fubar
parents:
diff changeset
218 outp = t(inp)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
219 write.table(outp,outf, quote=FALSE, sep="\t",row.names=F,col.names=F)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
220
64f7bd086146 Uploaded
fubar
parents:
diff changeset
221 Calculate a multiple test adjusted p value from a column of p values - for this script to be useful, it needs the right column for the input to be specified in the code for the
64f7bd086146 Uploaded
fubar
parents:
diff changeset
222 given input file type(s) specified when the tool is generated ::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
223
64f7bd086146 Uploaded
fubar
parents:
diff changeset
224 # use p.adjust - assumes a HEADER row and column 1 - please fix for any real use
64f7bd086146 Uploaded
fubar
parents:
diff changeset
225 column = 1 # adjust if necessary for some other kind of input
64f7bd086146 Uploaded
fubar
parents:
diff changeset
226 ourargs = commandArgs(TRUE)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
227 inf = ourargs[1]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
228 outf = ourargs[2]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
229 inp = read.table(inf,head=T,row.names=NULL,sep='\t')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
230 p = inp[,column]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
231 q = p.adjust(p,method='BH')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
232 outp = cbind(inp,'BH Adjusted p-value'=q)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
233 write.table(outp,outf, quote=FALSE, sep="\t",row.names=F,col.names=T)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
234
64f7bd086146 Uploaded
fubar
parents:
diff changeset
235
64f7bd086146 Uploaded
fubar
parents:
diff changeset
236 A demonstration Rscript example takes no input file but generates some random data based pdf images
64f7bd086146 Uploaded
fubar
parents:
diff changeset
237 You must make sure the option to create an HTML output file is
64f7bd086146 Uploaded
fubar
parents:
diff changeset
238 turned on for this to work. Images (pdf) are linked via thumbnails and
64f7bd086146 Uploaded
fubar
parents:
diff changeset
239 all files have a link on the resulting HTML page::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
240
64f7bd086146 Uploaded
fubar
parents:
diff changeset
241 # note this script takes NO input or output because it generates random data
64f7bd086146 Uploaded
fubar
parents:
diff changeset
242 for (i in 1:10) {
64f7bd086146 Uploaded
fubar
parents:
diff changeset
243 foo = runif(100)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
244 bar = rnorm(100)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
245 bar = foo + 0.05*bar
64f7bd086146 Uploaded
fubar
parents:
diff changeset
246 pdf(paste('yet',i,"anotherplot.pdf",sep='_'))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
247 plot(foo,bar,main=paste("Foo by Bar plot #",i),col="maroon", pch=3,cex=0.6)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
248 dev.off()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
249 foo = data.frame(a=runif(100),b=runif(100),c=runif(100),d=runif(100),e=runif(100),f=runif(100))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
250 bar = as.matrix(foo)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
251 pdf(paste('yet',i,"anotherheatmap.pdf",sep='_'))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
252 heatmap(bar,main='Random Heatmap')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
253 dev.off()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
254 }
64f7bd086146 Uploaded
fubar
parents:
diff changeset
255
64f7bd086146 Uploaded
fubar
parents:
diff changeset
256 A slight variation taking an input tabular file from which we read the first number as nreps
64f7bd086146 Uploaded
fubar
parents:
diff changeset
257
64f7bd086146 Uploaded
fubar
parents:
diff changeset
258 # note this script takes a single parameter
64f7bd086146 Uploaded
fubar
parents:
diff changeset
259 # number of replicates
64f7bd086146 Uploaded
fubar
parents:
diff changeset
260 ourargs = commandArgs(TRUE)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
261 infname = ourargs[1]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
262 nreps = read.table(infname,head=F)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
263 nreps = unlist(nreps)[1]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
264 nreps = max(c(1,nreps))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
265 nreps = min(c(20,nreps))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
266 print(paste("Using nreps=",nreps))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
267 for (i in 1:nreps) {
64f7bd086146 Uploaded
fubar
parents:
diff changeset
268 foo = runif(100)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
269 bar = rnorm(100)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
270 bar = foo + 0.2*bar
64f7bd086146 Uploaded
fubar
parents:
diff changeset
271 pdf(paste("yet",i,"anotherplot.pdf",sep="_"))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
272 plot(foo,bar,main=paste("Foo by Bar plot ",i),col="maroon", pch=3,cex=0.6)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
273 dev.off()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
274 foo = data.frame(a=runif(100),b=runif(100),c=runif(100),d=runif(100),e=runif(100),f=runif(100))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
275 bar = as.matrix(foo)
64f7bd086146 Uploaded
fubar
parents:
diff changeset
276 pdf(paste("yet",i,"anotherheatmap.pdf",sep="_"))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
277 heatmap(bar,main="Random Heatmap")
64f7bd086146 Uploaded
fubar
parents:
diff changeset
278 dev.off()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
279 }
64f7bd086146 Uploaded
fubar
parents:
diff changeset
280
64f7bd086146 Uploaded
fubar
parents:
diff changeset
281 A Python example that reverses each row of a tabular file (you'll need to remove the leading spaces
64f7bd086146 Uploaded
fubar
parents:
diff changeset
282 for this to work if cut and pasted into the script box)::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
283
64f7bd086146 Uploaded
fubar
parents:
diff changeset
284 # reverse order of columns in a tabular file
64f7bd086146 Uploaded
fubar
parents:
diff changeset
285 import sys
64f7bd086146 Uploaded
fubar
parents:
diff changeset
286 inp = sys.argv[1]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
287 outp = sys.argv[2]
64f7bd086146 Uploaded
fubar
parents:
diff changeset
288 i = open(inp,'r')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
289 o = open(outp,'w')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
290 for row in i:
64f7bd086146 Uploaded
fubar
parents:
diff changeset
291 rs = row.rstrip().split('\t')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
292 rs.reverse()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
293 o.write('\t'.join(rs))
64f7bd086146 Uploaded
fubar
parents:
diff changeset
294 o.write('\n')
64f7bd086146 Uploaded
fubar
parents:
diff changeset
295 i.close()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
296 o.close()
64f7bd086146 Uploaded
fubar
parents:
diff changeset
297
64f7bd086146 Uploaded
fubar
parents:
diff changeset
298 A trivial shell script example to show that it works::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
299
64f7bd086146 Uploaded
fubar
parents:
diff changeset
300 #!/bin/bash
64f7bd086146 Uploaded
fubar
parents:
diff changeset
301 INF=$1
64f7bd086146 Uploaded
fubar
parents:
diff changeset
302 OUTF=$2
64f7bd086146 Uploaded
fubar
parents:
diff changeset
303 cut -c2,4,6,8,10,12 $INF > $OUTF
64f7bd086146 Uploaded
fubar
parents:
diff changeset
304
64f7bd086146 Uploaded
fubar
parents:
diff changeset
305 A trivial perl script example to show that even perl works::
64f7bd086146 Uploaded
fubar
parents:
diff changeset
306
64f7bd086146 Uploaded
fubar
parents:
diff changeset
307 #
64f7bd086146 Uploaded
fubar
parents:
diff changeset
308 # change all occurances of a string in a file to another string
64f7bd086146 Uploaded
fubar
parents:
diff changeset
309 #
64f7bd086146 Uploaded
fubar
parents:
diff changeset
310 $oldfile = $ARGV[0];
64f7bd086146 Uploaded
fubar
parents:
diff changeset
311 $newfile = $ARGV[1];
64f7bd086146 Uploaded
fubar
parents:
diff changeset
312 $old = "gene";
64f7bd086146 Uploaded
fubar
parents:
diff changeset
313 $new = "foo";
64f7bd086146 Uploaded
fubar
parents:
diff changeset
314 open(OF, $oldfile);
64f7bd086146 Uploaded
fubar
parents:
diff changeset
315 open(NF, ">$newfile");
64f7bd086146 Uploaded
fubar
parents:
diff changeset
316 # read in each line of the file
64f7bd086146 Uploaded
fubar
parents:
diff changeset
317 while ($line = <OF>) {
64f7bd086146 Uploaded
fubar
parents:
diff changeset
318 $line =~ s/$old/$new/;
64f7bd086146 Uploaded
fubar
parents:
diff changeset
319 print NF $line;
64f7bd086146 Uploaded
fubar
parents:
diff changeset
320 }
64f7bd086146 Uploaded
fubar
parents:
diff changeset
321 close(OF);
64f7bd086146 Uploaded
fubar
parents:
diff changeset
322 close(NF);
64f7bd086146 Uploaded
fubar
parents:
diff changeset
323
64f7bd086146 Uploaded
fubar
parents:
diff changeset
324 ]]>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
325
64f7bd086146 Uploaded
fubar
parents:
diff changeset
326 **Citation**
64f7bd086146 Uploaded
fubar
parents:
diff changeset
327
64f7bd086146 Uploaded
fubar
parents:
diff changeset
328
64f7bd086146 Uploaded
fubar
parents:
diff changeset
329 Paper_ :
64f7bd086146 Uploaded
fubar
parents:
diff changeset
330
64f7bd086146 Uploaded
fubar
parents:
diff changeset
331 Creating re-usable tools from scripts: The Galaxy Tool Factory
64f7bd086146 Uploaded
fubar
parents:
diff changeset
332 Ross Lazarus; Antony Kaspi; Mark Ziemann; The Galaxy Team
64f7bd086146 Uploaded
fubar
parents:
diff changeset
333 Bioinformatics 2012; doi: 10.1093/bioinformatics/bts573
64f7bd086146 Uploaded
fubar
parents:
diff changeset
334
64f7bd086146 Uploaded
fubar
parents:
diff changeset
335
64f7bd086146 Uploaded
fubar
parents:
diff changeset
336 **Licensing**
64f7bd086146 Uploaded
fubar
parents:
diff changeset
337
64f7bd086146 Uploaded
fubar
parents:
diff changeset
338 Copyright Ross Lazarus (ross period lazarus at gmail period com) May 2012
64f7bd086146 Uploaded
fubar
parents:
diff changeset
339 All rights reserved.
64f7bd086146 Uploaded
fubar
parents:
diff changeset
340 Licensed under the LGPL_
64f7bd086146 Uploaded
fubar
parents:
diff changeset
341
64f7bd086146 Uploaded
fubar
parents:
diff changeset
342 .. _LGPL: http://www.gnu.org/copyleft/lesser.html
64f7bd086146 Uploaded
fubar
parents:
diff changeset
343 .. _GTF: https://bitbucket.org/fubar/galaxytoolfactory
64f7bd086146 Uploaded
fubar
parents:
diff changeset
344 .. _GTFI: https://bitbucket.org/fubar/galaxytoolfactory/issues
64f7bd086146 Uploaded
fubar
parents:
diff changeset
345 .. _Paper: http://bioinformatics.oxfordjournals.org/cgi/reprint/bts573?ijkey=lczQh1sWrMwdYWJ&amp;keytype=ref
64f7bd086146 Uploaded
fubar
parents:
diff changeset
346
64f7bd086146 Uploaded
fubar
parents:
diff changeset
347
64f7bd086146 Uploaded
fubar
parents:
diff changeset
348 </help>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
349 <citations>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
350 <citation type="doi">10.1093/bioinformatics/bts573</citation>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
351 </citations>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
352 </tool>
64f7bd086146 Uploaded
fubar
parents:
diff changeset
353
64f7bd086146 Uploaded
fubar
parents:
diff changeset
354