From 3aac79d151ade0900295d8064ecd9467d6cd7e56 Mon Sep 17 00:00:00 2001 From: Louis Date: Mon, 22 Dec 2025 15:39:01 +0100 Subject: [PATCH] Creating results dir if doesnt exists --- increasing_size_test.R | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/increasing_size_test.R b/increasing_size_test.R index 97a0dd8..25ab903 100644 --- a/increasing_size_test.R +++ b/increasing_size_test.R @@ -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()))