diff options
Diffstat (limited to 'R')
| -rw-r--r-- | R/calibrate_tranches_BC.R | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/R/calibrate_tranches_BC.R b/R/calibrate_tranches_BC.R index 0dd9d047..10942eac 100644 --- a/R/calibrate_tranches_BC.R +++ b/R/calibrate_tranches_BC.R @@ -1,8 +1,8 @@ ## parse command line arguments
-if(.Platform$OS.type == "unix"){
- root.dir <- "/home/share/CorpCDOs"
+root.dir <- if(.Platform$OS.type == "unix"){
+ "/home/share/CorpCDOs"
}else{
- root.dir <- "//WDSENTINEL/share/CorpCDOs"
+ "//WDSENTINEL/share/CorpCDOs"
}
library(logging)
basicConfig()
@@ -42,7 +42,7 @@ source(file.path(root.dir, "code", "R", "tranche_functions.R")) for(i in seq_along(runs$name)){
index.name <- runs$name[i]
tenor <- runs$tenor[i]
- filename <- file.path(root.dir,"Tranche_data","Runs",
+ filename <- file.path(root.dir, "Tranche_data", "Runs",
paste(tolower(index.name), tenor, "csv",sep="."))
if(!file.exists(filename)){
args$update <- FALSE
|