powered by
PgivenAcont(A, n, r)
$$P = A\left[\frac{e^{rn} - 1}{e^{rn}\left(e^{r} - 1\right)}\right]$$
[object Object],[object Object],[object Object],[object Object]
library(iemisc) PgivenAcont(2000, 3, 12) # the interest rate is 12\%
Run the code above in your browser using DataLab