Facilitate the ex post manual start of subsequent runs.

scripts/start/prepare_and_run.R

@@ -776,6 +776,7 @@ prepare_and_run <- function() {
     for(run in seq(1,length(cfg$subsequentruns))){
       filetext <- paste0(filetext,"\n")
       filetext <- paste0(filetext,"load('",cfg$subsequentruns[run],".RData')\n")
+      filetext <- paste0(filetext,"cfg$results_folder <- 'output/:title::date:'\n")
       filetext <- paste0(filetext,"cat('",cfg$subsequentruns[run],"')\n")
       filetext <- paste0(filetext,"submit(cfg)\n")
     }

scripts/start/submit.R

@@ -42,8 +42,7 @@ submit <- function(cfg) {
                 "prepare_and_run.R" = "scripts/start/prepare_and_run.R")
   .copy.fromlist(filelist,cfg$results_folder)
   
-  # remove config in main folder (after copying into results folder)
-  file.remove(paste0(cfg$title,".RData"))
+  # Do not remove RData files from REMIND main folder because they are needed for manually restarting subsequent runs
 
   # change to run folder
   setwd(cfg$results_folder)