diff options
Diffstat (limited to 'R')
| -rw-r--r-- | R/build_portfolios.R | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/R/build_portfolios.R b/R/build_portfolios.R index c50ceebb..01b689d7 100644 --- a/R/build_portfolios.R +++ b/R/build_portfolios.R @@ -104,7 +104,7 @@ for(deal.name in dealnames){ }
save(deal.portfolio, A, S, deal.weights, deal.dates, deal.spread5y,
deal.spreadatmaturity, deal.data, file=file.path(save.dir, paste0(deal.name, ".RData")))
- cat(deal.name, "... done\n")
+ cat(deal.name, "... done\n", file = stderr())
dealupdatedate <- currdealnames$updatedate[currdealnames$dealname %in% deal.name]
if(length(dealupdatedate) && dealupdatedate == workdate){
sqlstring <- sprintf(
@@ -140,5 +140,6 @@ for(deal.name in dealnames){ if(length(args)<1){
write.table(data.frame(dealnames, as.integer(!disablereinvflags)),
- file = file.path(root.dir, "scripts", "scenarios.txt"), row.names = F, col.names = F)
+ file = file.path(root.dir, "scripts", "scenarios.txt"),
+ row.names = F, col.names = F, quote = F)
}
|