diff --git a/code/applications/dore/01_dore_clusterize.R b/code/applications/dore/01_dore_clusterize.R index 2dc63e0..251de0a 100644 --- a/code/applications/dore/01_dore_clusterize.R +++ b/code/applications/dore/01_dore_clusterize.R @@ -9,6 +9,8 @@ plan(multicore) # Arguments arg <- commandArgs(trailingOnly = TRUE) +supinfo <- "_maxvemsteps_10000" + model <- "iid" seed <- 1234L @@ -105,14 +107,14 @@ list_collection <- clusterize_bipartite_networks( plot_details = 0L, backend = "future" ), - fit_opts = list(max_vem_steps = 200L) + fit_opts = list(max_vem_steps = 10000L) ) save_file <- file.path( save_folder, paste0( "dore_collection_", model, "_seed_", seed, - "_", start_time, ".Rds" + "_", start_time, supinfo, ".Rds" ) )