Mercurial > repos > ecology > sdmpredictors_list_layers
annotate sdmpredictors_list_layers.R @ 0:f20914d71c9d draft default tip
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
author | ecology |
---|---|
date | Mon, 08 Apr 2024 16:33:11 +0000 |
parents | |
children |
rev | line source |
---|---|
0
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
1 #!/bin/Rscript |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
2 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
3 args = commandArgs(trailingOnly=TRUE) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
4 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
5 #lister les option pour future et paléo, source internet ? |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
6 #donner une erreur quand une option est incorrecte |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
7 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
8 library(sdmpredictors) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
9 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
10 layers_modern_fun <- function(argument_number, file_number){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
11 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
12 data_terrestrial = as.logical(args[argument_number+1]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
13 data_marine = as.logical(args[argument_number+2]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
14 data_freshwater = as.logical(args[argument_number+3]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
15 data_monthly = as.logical(args[argument_number+4]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
16 data_version = as.numeric(args[argument_number+5]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
17 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
18 if(data_version==0){data_version <- NULL} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
19 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
20 datasets <- list_datasets(terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
21 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
22 , freshwater = data_freshwater) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
23 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
24 write.table(list_layers(datasets |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
25 , terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
26 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
27 , freshwater = data_freshwater |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
28 , monthly = data_monthly |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
29 , version = data_version |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
30 ), file = paste(as.character(file_number),"data_current.tabular", sep = "_"), sep = "\t", row.names=FALSE) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
31 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
32 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
33 layers_future_fun <- function(argument_number, file_number){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
34 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
35 data_terrestrial = as.logical(args[argument_number+1]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
36 data_marine = as.logical(args[argument_number+2]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
37 data_freshwater = as.logical(args[argument_number+3]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
38 data_monthly = as.logical(args[argument_number+4]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
39 data_version = as.numeric(args[argument_number+5]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
40 data_scenario = as.character(args[argument_number+6]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
41 data_year = as.numeric(args[argument_number+7]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
42 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
43 if(data_version==0){data_version <- NULL} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
44 if(data_scenario=="All"){data_scenario <- NA} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
45 if(data_year==0){data_year <- NA} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
46 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
47 datasets <- list_datasets(terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
48 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
49 , freshwater = data_freshwater) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
50 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
51 write.table(list_layers_future(datasets |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
52 , terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
53 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
54 , freshwater = data_freshwater |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
55 , monthly = data_monthly |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
56 , version = data_version |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
57 , scenario = data_scenario |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
58 , year = data_year |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
59 ), file = paste(as.character(file_number),"data_future.tabular", sep = "_"), sep = "\t", row.names=FALSE) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
60 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
61 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
62 layers_paleo_fun <- function(argument_number, file_number){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
63 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
64 data_terrestrial = as.logical(args[argument_number+1]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
65 data_marine = as.logical(args[argument_number+2]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
66 data_freshwater = as.logical(args[argument_number+3]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
67 data_monthly = as.logical(args[argument_number+4]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
68 data_version = as.numeric(args[argument_number+5]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
69 data_model_name = as.character(args[argument_number+6]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
70 data_epoch = as.character(args[argument_number+7]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
71 data_years_ago = as.numeric(args[argument_number+8]) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
72 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
73 if(data_version==0){data_versio <- NULL} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
74 if(data_model_name=="All"){data_model_name <- NA} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
75 if(data_epoch=="All"){data_epoch <- NA} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
76 if(data_years_ago==0){data_years_ago <- NA} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
77 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
78 datasets <- list_datasets(terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
79 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
80 , freshwater = data_freshwater) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
81 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
82 write.table(list_layers_paleo(datasets |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
83 , terrestrial = data_terrestrial |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
84 , marine = data_marine |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
85 , freshwater = data_freshwater |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
86 , monthly = data_monthly |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
87 , version = data_versio |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
88 , model_name = data_model_name |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
89 , epoch = data_epoch |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
90 , years_ago = data_years_ago |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
91 ), file = paste(as.character(file_number),"data_paleo.tabular", sep = "_"), sep = "\t", row.names=FALSE) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
92 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
93 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
94 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
95 if (length(args)<0){stop("not enough arguments") |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
96 }else{ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
97 n <- 1 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
98 for (a in 1:length(args)) { |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
99 if (as.character(args[a]) == "layers_current"){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
100 layers_modern_fun(a,n) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
101 n <- n+1 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
102 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
103 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
104 if (as.character(args[a]) == "layers_future"){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
105 layers_future_fun(a,n) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
106 n <- n+1 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
107 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
108 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
109 if (as.character(args[a]) == "layers_paleo"){ |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
110 layers_paleo_fun(a,n) |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
111 n <- n+1 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
112 } |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
113 }} |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
114 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
115 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
116 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
117 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
118 |
f20914d71c9d
planemo upload for repository https://github.com/galaxyecology/tools-ecology/tree/master/tools/sdmpredictors commit a4635c2349750b45d47b50ff1cecc8c5fdeb58e0
ecology
parents:
diff
changeset
|
119 |