R/future_value.R

In revendrat/FinancialMathematics: Financial Mathematics Functions

#' Calculates Future Value
#'
#' @param p numeric
#' @param r numeric
#' @param t numeric
#'
#' @return numeric
#' @export
#'
#' @examples
#' future_value(2500, 0.043, 8/12) #2571.67
future_value <- function(p, r, t) {
  p*(1+r*t)
}