diff options
| -rw-r--r-- | R/tranche_functions.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/tranche_functions.R b/R/tranche_functions.R index 3dd2388..135bfe5 100644 --- a/R/tranche_functions.R +++ b/R/tranche_functions.R @@ -787,7 +787,7 @@ BCtranche.theta <- function(index, shortened=4, complement=FALSE, method="ATM"){ temp2 <- BCtranche.pv(index, complement=complement)
temp3 <- BCtranche.delta(index, complement=complement)
return(list(thetas=temp2$bp-temp$bp+index$tranche.running,
- forward.deltas=delta=temp3$delta))
+ forward.deltas=temp3$delta))
}
BCtranche.delta <- function(index, complement=FALSE){
|