diff options
Diffstat (limited to 'R/build_scenarios.R')
| -rw-r--r-- | R/build_scenarios.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/build_scenarios.R b/R/build_scenarios.R index ea0f473e..b30bdfbb 100644 --- a/R/build_scenarios.R +++ b/R/build_scenarios.R @@ -26,11 +26,11 @@ if(length(args) >=2){ dealnames <- unlist(lapply(argslist, function(x)x[1]))
reinvflags <- unlist(lapply(argslist, function(x)x[2]))
}else{
- data <- read.table(file.path(root.dir, "scripts", "scenarios.txt"),
+ data <- read.table(file.path(root.dir, "scripts", "deals_to_price.txt"),
colClasses=c("character", "logical"))
dealnames <- data$V1
reinvflags <- data$V2
- unlink(file.path(root.dir, "scripts", "scenarios.txt"))
+ unlink(file.path(root.dir, "scripts", "deals_to_price.txt"))
}
source(file.path(root.dir, "code", "R", "intex_deal_functions.R"))
|