Computes the "shadow rates" implied by the inverse call transformation.
shadow_rates(.data, .group_col, .dbl_col, .eta = 0.015, .strike = 0)
.data | A tidy |
---|---|
.group_col | The maturities column. |
.dbl_col | A column with interest rates. |
.eta | A |
.strike | A |
A tidy tibble
.
library(ggplot2) data("us_yield_curve") shadow <- shadow_rates(us_yield_curve, maturity, rates) ggplot(shadow, aes(x = index, y = rates, color = maturity)) + geom_line()