annotate geo_cov_temp.R @ 0:4cd3d9fdb5f3 draft

planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
author ecology
date Sat, 02 Dec 2023 01:49:32 +0000
parents
children 2af7401f13e0
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
1 #27/11/2023
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
2 #Seguineau Pauline
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
3 #Make geographic coverage template
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
4
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
5 #Load packages
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
6
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
7 library(EMLassemblyline)
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
8
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
9 #Load arguments
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
10
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
11 args = commandArgs(trailingOnly=TRUE)
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
12 if(length(args)>0){
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
13
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
14 data_table <- args[1]
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
15 tablename <- args[2]
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
16 lat_col <- as.numeric(args[3])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
17 long_col <- as.numeric(args[4])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
18 site_col <- as.numeric(args[5])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
19 empty <- args[6]
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
20 }
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
21
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
22 datatable = read.table(data_table,header=T)
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
23
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
24 latcol = names(datatable[lat_col])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
25 longcol = names(datatable[long_col])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
26 sitecol = names(datatable[site_col])
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
27
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
28 if (empty == "false"){
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
29 empty = FALSE
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
30 }else if (empty=="true"){
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
31 empty=TRUE}
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
32
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
33 #Make template
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
34
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
35 template_geographic_coverage(path =".", data.path = "data_files", data.table = tablename, lat.col = latcol, lon.col = longcol, site.col = sitecol, empty = empty)
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
36
4cd3d9fdb5f3 planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/EMLassemblyline commit ea09df299078ff13beda210b36b7edaa6a79c099
ecology
parents:
diff changeset
37