# simple example
cf <- c(10,10,10) # $10 payments one per year for three years
t <- c(1,2,3) # years
p <- c(1,1,1) # payments certainty
presentValue(cashFlows = cf, timeIds = t, interestRates = 0.03, probabilities = p)
Run the code above in your browser using DataLab