diff options
Diffstat (limited to 'R/calibration.R')
| -rw-r--r-- | R/calibration.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/calibration.R b/R/calibration.R index 23441583..809edf1a 100644 --- a/R/calibration.R +++ b/R/calibration.R @@ -66,7 +66,7 @@ set.tranchedata <- function(index, tradedate){ index$quotes <- data.frame(maturity=index$maturity, refspread=temp$indexrefspread[1], refprice=temp$indexrefprice[1]) - index$quotes$spread <- couponfromindex(index, index$tenor)*1e-4 + index$quotes$spread <- couponfromindex(index$name, index$tenor)*1e-4 index$cs <- couponSchedule(IMMDate(tradedate, noadj=TRUE), index$maturity,"Q", "FIXED", 1, 0, tradedate, IMMDate(tradedate, "prev")) if(!is.na(index$quotes$refprice) && index$quotes$refprice != 0){ |