Mercurial > repos > siwaa > redelac_stics_t

annotate redelacSticsTool.R @ 19:8848db582840 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
author siwaa
date Thu, 09 Jul 2026 14:30:55 +0000
parents 8293d67cd1a9
children 475aa4451308
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
1 library(SticsRFiles)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
2 library(SticsOnR)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
3 library(dplyr)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
4 library(lubridate)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
5 library(parallel)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
6 library(doParallel)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
7 library(doFuture)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
8 library(stringr)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
9 library(readxl)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
10 library(data.table)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
11 library(readr)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
12 library(tidyr)
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
13 library(arrow)
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
14 sessionInfo()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
15
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
16 args = commandArgs(trailingOnly = TRUE)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
17
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
18 startTime <- Sys.time()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
19
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
20 workspace <- paste0(getwd(), "/WS")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
21 javastics_path <- getwd()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
22 default_config_path <- paste0(javastics_path, "/config")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
23
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
24 txt_path <- paste0(getwd(), "/WS/txt_files")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
25 dir.create(txt_path, recursive = T)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
26
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
27 USMsFile <- "USMs.csv"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
28 TecFile <- "Tec.csv"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
29 IniFile <- "Ini.csv"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
30 StationFile <- "Station.csv"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
31
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
32 redelac <- (args[1] == "optim")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
33 parallel <- (args[2] == "parallel")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
34 print(paste("parallel:", parallel, args[2]))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
35 nbSlots <- as.integer(args[3])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
36 print(paste("nbslots:", nbSlots))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
37 scenario <- args[4]
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
38 resulType <- args[5]
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
39
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
40 parquetOut <- (resulType == "parquet" || resulType == "both" )
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
41 baseOut <- (resulType == "rds+csv" || resulType == "both" )
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
42
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
43 # USMs file loading
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
44
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
45 usms_param <- read_params_table(file.path(workspace, USMsFile)) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
46 select(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
47 usm_name,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
48 datedebut,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
49 datefin,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
50 finit,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
51 nomsol,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
52 fstation,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
53 fclim1,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
54 fclim2,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
55 culturean,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
56 nbplantes,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
57 codesimul,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
58 fplt_1,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
59 ftec_1,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
60 flai_1,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
61 fplt_2,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
62 ftec_2,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
63 flai_2
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
64 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
65
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
66 # Tec files loading and generating xml
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
67
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
68 tec_param <- read_params_table(file.path(workspace, TecFile))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
69 columnToRemove <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
70 names(tec_param[grep("juleclair|nbinfloecl", names(tec_param))])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
71 columnToKeep <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
72 names(tec_param)[names(tec_param) %in% columnToRemove == FALSE]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
73
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
74 tec_param <- subset(tec_param, select = columnToKeep)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
75
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
76 gen_tec_xml(param_df = tec_param, out_dir = workspace)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
77
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
78 # Ini files loading and generating xml
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
79
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
80 ini_param <- read_params_table(file.path(workspace, IniFile))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
81
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
82 gen_ini_xml(param_df = ini_param, out_dir = workspace)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
83
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
84 # Station files loading and generating xml
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
85
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
86 sta_param <- read_params_table(file.path(workspace, StationFile))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
87
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
88 gen_sta_xml(param_df = sta_param, out_dir = workspace)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
89
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
90 if (parallel) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
91 doFuture::registerDoFuture()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
92 future::plan(multisession, workers = nbSlots)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
93 `%dordopar%` <- `%dofuture%`
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
94 } else {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
95 `%dordopar%` <- `%do%`
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
96 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
97
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
98 beforeGenXmlTime <- Sys.time()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
99
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
100 #gen_usms_xml(file = file.path(workspace, "usms.xml"),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
101 # param_df = usms_param)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
102
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
103 chunckSize <- 1000
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
104 nbUSMs <- nrow(usms_param)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
105
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
106 ids <- seq(1, nbUSMs, chunckSize)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
107
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
108 foreach (i = ids,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
109 .options.future = list(packages = c("foreach", "SticsRFiles"))) %dordopar% {
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
110 usmsXfolder = file.path(workspace, paste0("UXF__", i))
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
111 dir.create(usmsXfolder)
1
ed9c49c6c6e1 "planemo upload for repository https://forgemia.inra.fr/redelac commit c398d524dabc89c0979403d2ff62970fc6c2b404"
siwaa
parents: 0
diff changeset
112 gen_usms_xml(file = file.path(usmsXfolder, paste0("usms__", i, ".xml")),
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
113 param_df = usms_param[i:min(i + chunckSize - 1, nbUSMs),])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
114 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
115
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
116 afterGenXmlTime <- Sys.time()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
117 durGenX <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
118 lubridate::as.duration(lubridate::interval(beforeGenXmlTime,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
119 afterGenXmlTime))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
120
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
121 beforeGenTxtTime <- Sys.time()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
122
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
123 foreach (i = ids,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
124 .options.future = list(packages = c("foreach", "SticsRFiles"))) %dordopar% {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
125 gen_usms_xml2txt(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
126 javastics = javastics_path,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
127 workspace = workspace,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
128 out_dir = txt_path,
1
ed9c49c6c6e1 "planemo upload for repository https://forgemia.inra.fr/redelac commit c398d524dabc89c0979403d2ff62970fc6c2b404"
siwaa
parents: 0
diff changeset
129 usms_file = paste0("UXF__", i, "/usms__", i, ".xml"),
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
130 redelac = redelac,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
131 parallel = parallel,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
132 verbose = FALSE
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
133 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
134 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
135
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
136 afterGenTxtTime <- Sys.time()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
137 durGenT <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
138 lubridate::as.duration(lubridate::interval(beforeGenTxtTime, afterGenTxtTime))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
139
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
140 #
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
141 # Simulation part
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
142 #
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
143
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
144 beforeSimsTime <- Sys.time()
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
145
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
146 # List of successive USMs
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
147 successive_usms_file <- ("successionPlan.csv")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
148 successive_usms_tab <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
149 read.csv(file = file.path(workspace, successive_usms_file),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
150 sep = ";")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
151
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
152 # from succesions to simulate retrieving upcSol Cases
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
153
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
154 successRef <- successive_usms_tab["Treatment"]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
155
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
156 successRef <- successRef %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
157 separate(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
158 col = Treatment,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
159 into = c("upc", "sol", "systeme", "rotation", "tete_rotation", "horizon"),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
160 sep = "-",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
161 remove = FALSE
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
162 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
163
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
164 successRef$upcSol <- paste0(successRef$upc, "-", successRef$sol)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
165
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
166 casesUpcSol <- unique(successRef$upcSol)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
167
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
168 systeme <- successRef$systeme[1]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
169 rotation <- successRef$rotation[1]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
170
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
171 successive_usms_tab_split <- list()
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
172
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
173 for (j in 1:length(casesUpcSol)) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
174 splited <- strsplit(casesUpcSol[j], split = "-")[[1]]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
175
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
176 upc <- splited[1]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
177
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
178 sol <- splited[2]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
179
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
180 successive_usms_tab_split[[j]] <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
181 successive_usms_tab[successRef$upcSol == casesUpcSol[j],]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
182 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
183
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
184 result <- foreach(j = 1:length(casesUpcSol)) %:%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
185 foreach(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
186 i = 1:nrow(successive_usms_tab_split[[j]]),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
187 .options.future = list(packages =c("foreach", "SticsRFiles", "SticsOnR"))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
188
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
189 ) %dordopar% {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
190
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
191 nusms <- as.numeric(successive_usms_tab_split[[j]][i, 2])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
192
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
193 vec <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
194 as.character(successive_usms_tab_split[[j]][i, c(3:(2 + nusms))])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
195
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
196 list_successive_usms <- list(vec)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
197
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
198 sim_options <- stics_wrapper_options(
5
e0d592bb516e "planemo upload for repository https://forgemia.inra.fr/redelac commit 1b434482800e773a592b5fc6f472e7df465e91ce"
siwaa
parents: 1
diff changeset
199 stics_exe = "stics_modulo",
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
200 workspace = txt_path,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
201 verbose = TRUE,
5
e0d592bb516e "planemo upload for repository https://forgemia.inra.fr/redelac commit 1b434482800e773a592b5fc6f472e7df465e91ce"
siwaa
parents: 1
diff changeset
202 force = TRUE,
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
203 successive = list_successive_usms
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
204 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
205
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
206 list_usms <- vec
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
207
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
208 cat(paste0("--> succession : ", successive_usms_tab_split[[j]][i, 1], " launched\n"))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
209
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
210 return(stics_wrapper(model_options = sim_options, situation = list_usms))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
211
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
212 }
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
213
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
214 afterSimsTime <- Sys.time()
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
215 durSimsT <-
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
216 lubridate::as.duration(lubridate::interval(beforeSimsTime, afterSimsTime))
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
217 durSimsTP <- lubridate::as.period(durSimsT)
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
218
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
219 #
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
220 # Output part
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
221 #
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
222
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
223 beforeOutputsTime <- Sys.time()
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
224
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
225 for (j in 1:length(casesUpcSol)) {
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
226
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
227 successive_usms_tab_split[[j]]$Treatment <- NULL
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
228 successive_usms_tab_split[[j]]$Number_USM <- NULL
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
229
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
230 }
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
231
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
232 foreach(
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
233 j = 1:length(casesUpcSol),
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
234 .options.future = list(packages =c("foreach", "tidyr", "arrow"))
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
235 ) %dordopar% {
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
236
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
237 splited <- strsplit(casesUpcSol[j], split = "-")[[1]]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
238
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
239 upc <- splited[1]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
240
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
241 sol <- splited[2]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
242
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
243 for (i in 1:nrow(successive_usms_tab_split[[j]])) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
244 #i=1
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
245 if (i == 1) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
246 simPCP <- result[[j]][[i]]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
247 } else {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
248 simPCP$sim_list <- c(simPCP$sim_list, result[[j]][[i]]$sim_list)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
249 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
250
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
251 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
252
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
253 #agregation des sorties dans un dataframe
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
254 sim_df <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
255 rbindlist(simPCP$sim_list, use.names = TRUE, idcol = "usm")
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
256
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
257 #ajout des colonnes explicatives + de l'horizon temporel
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
258 sim_df <- sim_df %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
259 separate(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
260 col = usm,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
261 into = c(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
262 "upc",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
263 "sol",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
264 "systeme",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
265 "rotation",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
266 "tete_rotation",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
267 "horizon",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
268 "annee",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
269 "culture"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
270 ),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
271 sep = "-",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
272 remove = FALSE
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
273 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
274
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
275 #sauvegarde sous la forme d'un fichier rds
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
276
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
277 if (baseOut) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
278
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
279 if (dir.exists(paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
280 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
281 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
282 systeme,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
283 "/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
284 rotation
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
285 )) == FALSE) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
286 dir.create(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
287 paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
288 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
289 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
290 systeme,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
291 "/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
292 rotation
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
293 ),
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
294 recursive = TRUE
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
295 )
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
296 }
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
297
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
298 saveRDS(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
299 sim_df,
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
300 paste0(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
301 workspace,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
302 "/analyse_simulations_STICS/",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
303 systeme,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
304 "/",
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
305 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
306 "/outputs-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
307 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
308 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
309 upc,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
310 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
311 sol,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
312 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
313 scenario,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
314 ".rds"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
315 )
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
316 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
317 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
318
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
319 if (parquetOut) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
320
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
321 if (dir.exists(paste0(
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
322 workspace,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
323 "/analyse_simulations_STICS/",
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
324 "/donnees_parquet_outputs/"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
325 )) == FALSE) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
326 dir.create(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
327 paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
328 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
329 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
330 "/donnees_parquet_outputs/"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
331 ),
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
332 recursive = TRUE
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
333 )
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
334 }
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
335
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
336 write_parquet(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
337 sim_df,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
338 paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
339 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
340 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
341 "/donnees_parquet_outputs/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
342 "outputs-",
17
fa4e7fd1d3f7 "planemo upload for repository https://forgemia.inra.fr/redelac commit d102b73678f095281635bf5f00d86a4a77a1ae9e"
siwaa
parents: 16
diff changeset
343 systeme,
fa4e7fd1d3f7 "planemo upload for repository https://forgemia.inra.fr/redelac commit d102b73678f095281635bf5f00d86a4a77a1ae9e"
siwaa
parents: 16
diff changeset
344 "-",
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
345 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
346 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
347 upc,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
348 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
349 sol,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
350 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
351 scenario,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
352 ".parquet"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
353
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
354 ))
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
355 }
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
356
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
357 #successive_usms_tab_split[[j]]$Treatment <- NULL
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
358 #successive_usms_tab_split[[j]]$Number_USM <- NULL
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
359
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
360 list_usms <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
361 unlist(unname(as.list(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
362 transpose(successive_usms_tab_split[[j]])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
363 )))
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
364 list_usms <- list_usms[!is.na(list_usms)]
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
365 list_usms <- list_usms[list_usms != '']
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
366
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
367 list_usms_yr1 <- successive_usms_tab_split[[j]]$USM_1
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
368
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
369 for (i in 1:length(list_usms)) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
370 if (i == 1) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
371 #ajout d'une condition sur l'existence du fichier "mod_rapport.sti" pour la concatenation
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
372 #en attendant que toutes les simulations tournent correctement
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
373 #if(exists(file.path(txt_path, list_usms[i], "mod_rapport.sti"))==TRUE){
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
374 rap_1 <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
375 read_delim(file.path(txt_path, list_usms[i], "mod_rapport.sti"),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
376 col_names = TRUE)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
377 names_col <- colnames(rap_1)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
378
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
379 rap_string <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
380 read_lines(file = file.path(txt_path, list_usms[i], "mod_rapport.sti"),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
381 skip = 1)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
382
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
383 rap <- as_tibble(rap_string) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
384 separate(col = value,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
385 sep = ";",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
386 into = names_col) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
387 mutate(USM = list_usms[i])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
388 # }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
389
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
390 } else {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
391 #if (list_usms[i] %in% list_usms_yr1) {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
392 #ajout d'une condition sur l'existence du fichier "mod_rapport.sti" pour la concatenation
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
393 #en attendant que toutes les simulations tournent correctement
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
394 #if(exists(file.path(txt_path, list_usms[i], "mod_rapport.sti"))==TRUE){
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
395 rap_string <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
396 read_lines(file = file.path(txt_path, list_usms[i], "mod_rapport.sti"),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
397 skip = 1,)#}
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
398
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
399 # } else {
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
400 #ajout d'une condition sur l'existence du fichier "mod_rapport.sti" pour la concatenation
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
401 #en attendant que toutes les simulations tournent correctement
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
402 #if(exists(file.path(txt_path, list_usms[i], "mod_rapport.sti"))==TRUE){
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
403 # rap_string <-
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
404 # read_file(file = file.path(txt_path, list_usms[i], "mod_rapport.sti"))#}
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
405 # }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
406 rap_i <- as_tibble(rap_string) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
407 separate(col = value,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
408 sep = ";",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
409 into = names_col) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
410 mutate(USM = list_usms[i])
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
411
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
412 rap <- bind_rows(rap, rap_i)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
413
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
414 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
415
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
416 }
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
417 rm(rap_1, names_col, rap_string, rap_i)
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
418
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
419 rap <- rap %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
420 select(USM, everything()) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
421 mutate(P_usm = str_replace_all(P_usm, " ", "")) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
422 mutate(wlieu = str_replace_all(wlieu, " ", "")) %>%
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
423 mutate(stade = str_replace_all(stade, " ", "")) %>%
5
e0d592bb516e "planemo upload for repository https://forgemia.inra.fr/redelac commit 1b434482800e773a592b5fc6f472e7df465e91ce"
siwaa
parents: 1
diff changeset
424 mutate(nomversion = str_replace_all(P_usm, " ", "")) %>%
e0d592bb516e "planemo upload for repository https://forgemia.inra.fr/redelac commit 1b434482800e773a592b5fc6f472e7df465e91ce"
siwaa
parents: 1
diff changeset
425 mutate(across(4:10, as.numeric)) %>%
e0d592bb516e "planemo upload for repository https://forgemia.inra.fr/redelac commit 1b434482800e773a592b5fc6f472e7df465e91ce"
siwaa
parents: 1
diff changeset
426 mutate(across(14:ncol(rap), as.numeric)) %>%
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
427 separate(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
428 col = USM,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
429 into = c(
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
430 "upc",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
431 "sol",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
432 "systeme",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
433 "rotation",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
434 "tete_rotation",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
435 "horizon",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
436 "annee",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
437 "culture"
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
438 ),
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
439 sep = "-",
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
440 remove = FALSE
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
441 )
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
442
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
443 if (baseOut) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
444
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
445 write_delim(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
446 x = rap,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
447 file = paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
448 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
449 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
450 systeme,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
451 "/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
452 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
453 "/report-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
454 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
455 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
456 upc,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
457 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
458 sol,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
459 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
460 scenario,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
461 ".csv"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
462 ),
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
463 delim = ";"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
464 )
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
465 }
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
466
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
467 if (parquetOut) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
468
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
469 if (dir.exists(paste0(
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
470 workspace,
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
471 "/analyse_simulations_STICS/",
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
472 "/donnees_parquet_report/"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
473 )) == FALSE) {
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
474 dir.create(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
475 paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
476 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
477 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
478 "/donnees_parquet_report/"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
479 ),
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
480 recursive = TRUE
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
481 )
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
482 }
0
7f8f474a7bd7 "planemo upload for repository https://forgemia.inra.fr/redelac commit 29a2aee3b41d8da4d056600ea5cf4af978c714b9"
siwaa
parents:
diff changeset
483
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
484 write_parquet(
16
816fbce5cf58 "planemo upload for repository https://forgemia.inra.fr/redelac commit cfb92a37e4cb2054f9d8caa5bd8f46c9f4a7be68"
siwaa
parents: 15
diff changeset
485 rap,
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
486 paste0(
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
487 workspace,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
488 "/analyse_simulations_STICS/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
489 "/donnees_parquet_report/",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
490 "report-",
17
fa4e7fd1d3f7 "planemo upload for repository https://forgemia.inra.fr/redelac commit d102b73678f095281635bf5f00d86a4a77a1ae9e"
siwaa
parents: 16
diff changeset
491 systeme,
fa4e7fd1d3f7 "planemo upload for repository https://forgemia.inra.fr/redelac commit d102b73678f095281635bf5f00d86a4a77a1ae9e"
siwaa
parents: 16
diff changeset
492 "-",
15
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
493 rotation,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
494 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
495 upc,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
496 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
497 sol,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
498 "-",
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
499 scenario,
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
500 ".parquet"
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
501
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
502 ))
af807768332e "planemo upload for repository https://forgemia.inra.fr/redelac commit 179e64aac208ae8af4d7416a7d5ff4b9da572850"
siwaa
parents: 5
diff changeset
503 }
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
504 }
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
505
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
506 afterOutputsTime <- Sys.time()
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
507
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
508 durOutT <-
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
509 lubridate::as.duration(lubridate::interval(beforeOutputsTime, afterOutputsTime))
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
510
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
511
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
512 durGenXP <- lubridate::as.period(durGenX)
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
513 durGenTP <- lubridate::as.period(durGenT)
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
514 durOutTP <- lubridate::as.period(durOutT)
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
515
19
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
516 endTime <- Sys.time()
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
517
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
518 dur <-
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
519 lubridate::as.period(lubridate::as.duration(lubridate::interval(startTime, endTime)))
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
520
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
521 print("REDELACSticsInputGenerator Report")
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
522 print("=================================")
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
523 print(paste("number of usms: ", nrow(usms_param)))
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
524 print(paste("redelac optimization:", redelac))
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
525 print(paste("process in parallel:", parallel))
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
526 print(paste("nbslots:", nbSlots))
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
527
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
528 sprintf(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
529 'overall duration: %g jour(s) %g heure(s) %g minute(s) %g seconde(s)',
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
530 lubridate::day(dur),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
531 lubridate::hour(dur),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
532 lubridate::minute(dur),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
533 lubridate::second(dur)
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
534 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
535 print(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
536 "==================================================================================="
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
537 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
538
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
539 sprintf(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
540 'inside gen_usms_xml duration: %g jour(s) %g heure(s) %g minute(s) %g seconde(s)',
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
541 lubridate::day(durGenXP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
542 lubridate::hour(durGenXP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
543 lubridate::minute(durGenXP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
544 lubridate::second(durGenXP)
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
545 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
546 print(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
547 "==================================================================================="
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
548 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
549
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
550 sprintf(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
551 'inside gen_usms_xml2txt duration: %g jour(s) %g heure(s) %g minute(s) %g seconde(s)',
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
552 lubridate::day(durGenTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
553 lubridate::hour(durGenTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
554 lubridate::minute(durGenTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
555 lubridate::second(durGenTP)
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
556 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
557 print(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
558 "==================================================================================="
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
559 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
560
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
561 sprintf(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
562 'Simulations duration: %g jour(s) %g heure(s) %g minute(s) %g seconde(s)',
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
563 lubridate::day(durSimsTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
564 lubridate::hour(durSimsTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
565 lubridate::minute(durSimsTP),
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
566 lubridate::second(durSimsTP)
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
567 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
568 print(
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
569 "==================================================================================="
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
570 )
8848db582840 "planemo upload for repository https://forgemia.inra.fr/redelac commit 9f38541b8f84bf16077819d47c96dbc69e3d1675"
siwaa
parents: 18
diff changeset
571
18
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
572 sprintf(
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
573 'outputs generating duration: %g jour(s) %g heure(s) %g minute(s) %g seconde(s)',
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
574 lubridate::day(durOutTP),
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
575 lubridate::hour(durOutTP),
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
576 lubridate::minute(durOutTP),
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
577 lubridate::second(durOutTP)
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
578 )
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
579 print(
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
580 "==================================================================================="
8293d67cd1a9 "planemo upload for repository https://forgemia.inra.fr/redelac commit b972382172a3923486a799d46efe363d21e8ea1d"
siwaa
parents: 17
diff changeset
581 )