accelerated_coupon_value: Present value of coupons according to an acceleration...
In ragtop: Pricing Equity Derivatives with Extensions of Black-Scholes

Compute "present" value as of time t for coupons that would otherwise have been paid up to time acceleration_t, in the case of accelerated coupon provisions for forced conversions (or sometimes even unforced ones).

accelerated_coupon_value(
  t,
  coupons_df,
  discount_factor_fcn,
  acceleration_t = Inf
)

`t`	The time toward which all coupons should be present valued
`coupons_df`	A data.frame of details for each coupon. It should have the columns `payment_time` and `payment_size`.
`discount_factor_fcn`	A function specifying how the contract says future coupons should be discounted for this instrument in case the acceleration clause is triggered
`acceleration_t`	Time limit, up to which coupons will be accelerated