Creating results dir if doesnt exists
This commit is contained in:
parent
8afd913289
commit
3aac79d151
1 changed files with 4 additions and 0 deletions
|
|
@ -69,6 +69,10 @@ library(here)
|
||||||
results_dir <- here("results", "increasing_size")
|
results_dir <- here("results", "increasing_size")
|
||||||
save_path <- here(results_dir, paste0("sbm_incr_", model, "_from_", min_nb_col, "_to_", max_nb_col, ".Rds"))
|
save_path <- here(results_dir, paste0("sbm_incr_", model, "_from_", min_nb_col, "_to_", max_nb_col, ".Rds"))
|
||||||
|
|
||||||
|
if (!dir.exists(results_dir)) {
|
||||||
|
dir.create(results_dir)
|
||||||
|
}
|
||||||
|
|
||||||
print(paste0("Final results will be saved to ", save_path))
|
print(paste0("Final results will be saved to ", save_path))
|
||||||
|
|
||||||
# (epoch <- as.integer(Sys.time()))
|
# (epoch <- as.integer(Sys.time()))
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue