CompIntCharg | R Documentation |
Computes the total interest paid at the end of n periods using compound interest
CompIntCharg(
P,
n,
i,
frequency = c("annual", "semiannual", "quarter", "bimonth", "month", "daily")
)
P |
numeric vector that contains the present 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)] |
Compound Interest Charged is expressed as
I = P\left(1 + i\right)^n - P
the "principal amount (lent or borrowed)"
I
the "total interest paid"
the "interest rate per interest period"
the "number of interest periods"
CompIntCharg numeric vector that contains the total interest paid at the end of n periods rounded to 2 decimal places
Irucka Embry
SFPE Handbook of Fire Protection Engineering. 3rd Edition, DiNenno, P. J.; Drysdale, D.; Beyler, C. L.; Walton, W. D., Editor(s), page 5-94, 2002. Chapter 7; Section 5; NFPA HFPE-02. See https://web.archive.org/web/20180127185316/http://fire.nist.gov/bfrlpubs/build02/PDF/b02155.pdf.
William G. Sullivan, Elin M. Wicks, and C. Patrick Koelling, Engineering Economy, Fourteenth Edition, Upper Saddle River, New Jersey: Pearson/Prentice Hall, 2009, page 120.
Chinyere Onwubiko, An Introduction to Engineering, Mission, Kansas: Schroff Development Corporation, 1997, page 205-206.
library(iemisc)
# Compound Interest example from SFPE Reference text
# Modified example to provide the compounded interest amount paid only
CompIntCharg(100, 5, 10, frequency = "annual") # the interest rate is 10\%
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.