diff options
| -rw-r--r-- | R/calibrate_tranches_BC.R | 4 | ||||
| -rw-r--r-- | R/tranches_RV_BC.R | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/R/calibrate_tranches_BC.R b/R/calibrate_tranches_BC.R index bed9a4e3..7487bc80 100644 --- a/R/calibrate_tranches_BC.R +++ b/R/calibrate_tranches_BC.R @@ -103,9 +103,9 @@ for(i in seq_along(runs$name)){ ## save risk numbers into the csv file
if(!args$update && j==1){
- cat(csvheaders(index), "\n", file=filename)
+ cat(csvheaders(index), sep="\n", file=filename)
}
- cat(tocsv(index), "\n", file=filename, append=TRUE)
+ cat(tocsv(index), sep="\n", file=filename, append=TRUE)
loginfo("done")
}
}
diff --git a/R/tranches_RV_BC.R b/R/tranches_RV_BC.R index 890ac94a..8b008561 100644 --- a/R/tranches_RV_BC.R +++ b/R/tranches_RV_BC.R @@ -94,7 +94,7 @@ for(i in seq_along(runs$name1)){ paste(index2$name, row.names(index2$tranches), "PM PV"))
cat(paste(headers, collapse=","), "\n", file=filename)
}
- cat(paste(row, collapse=","), "\n", file=filename, append=TRUE)
+ cat(paste(row, collapse=","), sep="\n", file=filename, append=TRUE)
}
}
|