Skip to content
Snippets Groups Projects
Commit 03124715 authored by David Klein's avatar David Klein
Browse files

Allow to restart a run that did not write a gdx before it aborted. Closing #140

parent 4031b038
No related branches found
No related tags found
1 merge request!155A coupled of fixes and improvements to the start scripts
Hide whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
start.R
+ 1
− 1
View file @ 03124715
...@@ -47,7 +47,7 @@ choose_folder <- function(folder,title="Please choose a folder") { ...@@ -47,7 +47,7 @@ choose_folder <- function(folder,title="Please choose a folder") {
# Detect all output folders containing fulldata.gdx or non_optimal.gdx # Detect all output folders containing fulldata.gdx or non_optimal.gdx
# For coupled runs please use the outcommented text block below # For coupled runs please use the outcommented text block below
dirs <- sub("/(non_optimal|fulldata).gdx","",sub("./output/","",Sys.glob(c(file.path(folder,"*","non_optimal.gdx"),file.path(folder,"*","fulldata.gdx"))))) dirs <- sub("/full.gms","",sub("./output/","",Sys.glob(file.path(folder,"*","full.gms"))))
# DK: The following outcommented lines are specially made for listing results of coupled runs # DK: The following outcommented lines are specially made for listing results of coupled runs
#runs <- findCoupledruns(folder) #runs <- findCoupledruns(folder)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment