PV <- 9000
FV <- 13000
years <- 3
(geometric <- CAGR(9000, 13000, years, type="geometric"))
(continuous <- CAGR(9000, 13000, years, type="continuous"))
9000 * (1 + geometric) ** years
9000 * exp(continuous * years)
## Not run:
# error <- CAGR(9000, 13000, years, type="error")## End(Not run)
Run the code above in your browser using DataLab