Net present value of a profit signature
NPV_profit.RdComputes the Chapter 17 net present value: $$ NPV = \sum_{t=0}^{n}\frac{\Pi_t}{(1+r)^t}. $$
Examples
Pi <- c(-15.00, 8.42, 8.39, 8.58)
NPV_profit(Pi, r = 0.10)
#> [1] 6.034711
NPV_profit.RdComputes the Chapter 17 net present value: $$ NPV = \sum_{t=0}^{n}\frac{\Pi_t}{(1+r)^t}. $$
Pi <- c(-15.00, 8.42, 8.39, 8.58)
NPV_profit(Pi, r = 0.10)
#> [1] 6.034711