Creating results dir if doesnt exists

This commit is contained in:
Louis 2025-12-22 15:39:01 +01:00
parent 8afd913289
commit 3aac79d151

View file

@ -69,6 +69,10 @@ library(here)
results_dir <- here("results", "increasing_size")
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))
# (epoch <- as.integer(Sys.time()))