diff options
| -rw-r--r-- | R/load_cf.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/load_cf.R b/R/load_cf.R index b12cff46..b312bf4c 100644 --- a/R/load_cf.R +++ b/R/load_cf.R @@ -252,7 +252,7 @@ getcusipcf <- function(cusips, cfdata, dist, workdate=Sys.Date()){ price = 100 * val[,"Cashflow"]/cusipdata[[cusip]]$currbal,
wal = val[,"wal"],
duration = val[,"duration"],
- delta = compute.delta(dist, cfdata[[dealnames]]$weight,
+ delta = compute.delta(dist, cfdata[[dealname]]$weight,
r[,"Cashflow"]/cusipdata[[cusip]]$currbal, workdate))
cat("done", cusip, "\n")
}
|