PgivenG | R Documentation |
Compute P given G
PgivenG(
G,
n,
i,
frequency = c("annual", "semiannual", "quarter", "bimonth", "month", "daily")
)
G |
numeric vector that contains the gradient value(s) |
n |
numeric vector that contains the period value(s) |
i |
numeric vector that contains the interest rate(s) as a percent |
frequency |
character vector that contains the frequency used to obtain the number of periods [annual (1), semiannual (2), quarter (4), bimonth (6), month (12), daily (365)] |
P = G\left\lbrace \frac{1}{i} \left[\frac{\left(1 + i\right)^n - 1}{i\left(1 + i\right)^n} - \frac{n}{\left(1 + i\right)^n}\right]\right\rbrace
the "present equivalent"
the "uniform gradient amount"
the "effective interest rate per interest period"
the "number of interest periods"
PgivenG numeric vector that contains the present value(s) rounded to 2 decimal places
Irucka Embry
William G. Sullivan, Elin M. Wicks, and C. Patrick Koelling, Engineering Economy, Fourteenth Edition, Upper Saddle River, New Jersey: Pearson/Prentice Hall, 2009, page 142, 150, 152-154.
library(iemisc)
# Example 4-20 from the Reference text (pages 153-154)
PgivenG(1000, 4, 15, "annual") # the interest rate is 15%
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.