annotate make_eml.R @ 0:9cbac7a9b1a3 draft

planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
author ecology
date Wed, 13 Sep 2023 19:56:16 +0000
parents
children 9d56f6480194
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
1 ##07/06/2023
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
2 ##Genthon Tanguy
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
3 ###make_eml
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
4
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
5 args = commandArgs(trailingOnly=TRUE)
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
6 if(length(args)>0){
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
7 title <- args[1]
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
8 }
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
9
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
10 EMLassemblyline::make_eml("output_template",eml.path=".", dataset.title = title)
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
11 old.names <- list.files(path=".", pattern=".xml")
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
12 print(old.names)
9cbac7a9b1a3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit 2d139641e5afb8c75b8aded37bdbd7aecae0fb83
ecology
parents:
diff changeset
13 file.rename(from=old.names, to="eml.xml")