WSL/SLF GitLab Repository

Commit ecc74365 authored by Adrien Michel's avatar Adrien Michel
Browse files

Solved problem in directories creation

parent 44c5e7c7
......@@ -273,10 +273,10 @@ train.model <- function(data.training.file , data.target.file, params.qm,
data.target <- readRDS(data.target.file)
print("[I] Creating output directories")
dir.create(out.quantiles.dir, showWarnings = FALSE)
dir.create(paste0(out.quantiles.dir,"/training_quantiles/"), showWarnings = FALSE)
dir.create(paste0(out.quantiles.dir,"/target_quantiles/"), showWarnings = FALSE)
dir.create(out.plot.dir, showWarnings = FALSE)
dir.create(out.quantiles.dir, showWarnings = FALSE, recursive = TRUE)
dir.create(paste0(out.quantiles.dir,"/training_quantiles/"), showWarnings = FALSE, recursive = TRUE)
dir.create(paste0(out.quantiles.dir,"/target_quantiles/"), showWarnings = FALSE, recursive = TRUE)
dir.create(out.plot.dir, showWarnings = FALSE, recursive = TRUE)
if(length(list.files(paste0(out.quantiles.dir,"/training_quantiles/")))>0) {
unlink(paste0(out.quantiles.dir,"/training_quantiles/*"))
}
......
......@@ -32,7 +32,7 @@ assessment.plot <- function(data.target.file,
start.time <- Sys.time()
dir.create(out.plot.dir, showWarnings = FALSE)
dir.create(out.plot.dir, showWarnings = FALSE, recursive = TRUE)
print("[I] Reading target data")
data.target<- readRDS(data.target.file)
......@@ -187,7 +187,7 @@ assessment.plot.calib.internal <- function (data.target.calib,
ncores)
{
dir.create(out.plot.dir, showWarnings = FALSE)
dir.create(out.plot.dir, showWarnings = FALSE, recursive = TRUE)
print("[I] Plotting seasonnal details")
start.time.2=Sys.time()
......@@ -371,6 +371,8 @@ assessment.plot.calib <- function(data.target.calib.file,
ncores = 1,
mask.files = NULL) {
dir.create(out.plot.dir, showWarnings = TRUE, recursive = TRUE)
start.time <- Sys.time()
print("[I] Reading target data calibration")
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment