Title: | Engineering Economics Analysis for Engineering Projects Cost Analysis |
---|---|
Description: | Computing economic analysis in civil infrastructure and ecosystem restoration projects is a typical activity. This package contains Standard cost engineering and engineering economics methods that are applied to convert between present, future, and annualized costs. Newnan D. (2020) <ISBN 9780190931919> “Engineering Economic Analysis”. |
Authors: | Liya Abera [aut, cre] , S. Kyle McKay [aut] |
Maintainer: | Liya Abera <[email protected]> |
License: | GPL-3 |
Version: | 1.0.0 |
Built: | 2024-11-23 05:18:04 UTC |
Source: | https://github.com/cran/EngrEcon |
annual_to_future
Compute future values from uniform annual payments
using uniform series compound amount factor (uscaf)Calculate future value from a uniform annual payment
annual_to_future
Compute future values from uniform annual payments
using uniform series compound amount factor (uscaf)
annual_to_future(i, n, A)
annual_to_future(i, n, A)
i |
discount rate in percent per year |
n |
life span in years |
A |
series of uniform annual payments |
FV
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: FV = 5664161 annual_to_future(0.08, 30, 50000)
# Result: FV = 5664161 annual_to_future(0.08, 30, 50000)
annual_to_present
Compute present value from uniform annual payments
using uniform series present worth factor (uswf)Calculate present value from a uniform annual payment
annual_to_present
Compute present value from uniform annual payments
using uniform series present worth factor (uswf)
annual_to_present(i, n, A)
annual_to_present(i, n, A)
i |
discount rate in percent per year |
n |
life span in years |
A |
series of uniform annual payments |
pr.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: pr.value = $337733.5 annual_to_present(0.08, 30, 30000)
# Result: pr.value = $337733.5 annual_to_present(0.08, 30, 30000)
cashflow
Compute a given cash flow data's present value and annual value.
The first column is the cash flow year;the rest is the cash flow money.
The number of rows is the lifespanCalculate present value and annual value from a given future payments of cash flows
cashflow
Compute a given cash flow data's present value and annual value.
The first column is the cash flow year;the rest is the cash flow money.
The number of rows is the lifespan
cashflow(i, cashflowdata)
cashflow(i, cashflowdata)
i |
annual interest rate in percentage |
cashflowdata |
cash flow data containing the life span and money value of the cash flow for each year |
cash.flow.table
# Result : cash.flow.table # Result : future value = 232540.78 # Result : present value = 206330.96 year = c(1:5) capital = c(63000,1300,1300,1600,1300) year1 = c(60000,0,10000,0,0) year2 = c(0,0,30000,50000,0) cashflowdata <- data.frame (year, capital, year1, year2) cashflow(0.055, cashflowdata)
# Result : cash.flow.table # Result : future value = 232540.78 # Result : present value = 206330.96 year = c(1:5) capital = c(63000,1300,1300,1600,1300) year1 = c(60000,0,10000,0,0) year2 = c(0,0,30000,50000,0) cashflowdata <- data.frame (year, capital, year1, year2) cashflow(0.055, cashflowdata)
effective_i
Compute future value nominal rate and
compounding period per year, and frequency.Calculate effective annual interest rate for a known nominal rate and compounding period per year
effective_i
Compute future value nominal rate and
compounding period per year, and frequency.
effective_i(r, m = c("yearly", "quarterly", "monthly"))
effective_i(r, m = c("yearly", "quarterly", "monthly"))
r |
nominal interest rate in decimal number |
m |
number of compounding period per year monthly = 12 Quarterly = 4 yearly = 1 |
effective_i
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. (2020). Engineering Economic Analysis (14th ed.). New York, Oxford University Press.
David, W., & Terry, R. (2012). Fundamentals of Engineering Economics and Decision Analysis. Springer Nature.
# Result: effective_i = effective_i (0.08, m = "yearly")
# Result: effective_i = effective_i (0.08, m = "yearly")
future_to_annual
calculate annual value from future value using
the accumulated amount after years using sinking fund factor (sff)Compute annual payment value from future value
future_to_annual
calculate annual value from future value using
the accumulated amount after years using sinking fund factor (sff)
future_to_annual(i, n, FV)
future_to_annual(i, n, FV)
i |
discount rate in percent per year |
n |
life span in years |
FV |
accumulated (future) value |
A
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: A = 5737.83 future_to_annual(0.08, 30, 650000)
# Result: A = 5737.83 future_to_annual(0.08, 30, 650000)
future_to_present
calculate present value from future value using
present worth factor (pwf)Compute present values from future payments (or cash flow)
future_to_present
calculate present value from future value using
present worth factor (pwf)
future_to_present(i, n, FV)
future_to_present(i, n, FV)
i |
discount rate in percent per year |
n |
life span in years |
FV |
future value |
pr.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: pr.value = 2981.32 future_to_present(0.08, 30, 30000)
# Result: pr.value = 2981.32 future_to_present(0.08, 30, 30000)
gradient_to_annual
Compute annual value from uniform gradient payments
using uniform gra present worth factor (ugaw)Calculate annual value from uniform gradient payment
gradient_to_annual
Compute annual value from uniform gradient payments
using uniform gra present worth factor (ugaw)
gradient_to_annual(i, n, G, A)
gradient_to_annual(i, n, G, A)
i |
discount rate in percent per year |
n |
life span in years |
G |
uniform gradient payments |
A |
initial annual payment |
ann.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: ann.value = $ 105138.30 gradient_to_annual(0.08, 30, 6000, 50000)
# Result: ann.value = $ 105138.30 gradient_to_annual(0.08, 30, 6000, 50000)
gradient_to_future
Compute future value from uniform gradient payments
using uniform gradient present worth factor (ugfw)Calculate future value from uniform gradient payment
gradient_to_future
Compute future value from uniform gradient payments
using uniform gradient present worth factor (ugfw)
gradient_to_future(i, n, G)
gradient_to_future(i, n, G)
i |
discount rate in percent per year |
n |
life span in years |
G |
uniform gradient payments |
fr.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: fr.value = $ 312312 gradient_to_future(0.08, 30,300)
# Result: fr.value = $ 312312 gradient_to_future(0.08, 30,300)
gradient_to_present
Compute present value from uniform gradient payments
using uniform gradient present worth factor (ugpw)Calculate present value from uniform gradient payment
gradient_to_present
Compute present value from uniform gradient payments
using uniform gradient present worth factor (ugpw)
gradient_to_present(i, n, G)
gradient_to_present(i, n, G)
i |
discount rate in percent per year |
n |
life span in years |
G |
uniform gradient payments |
pr.value
#' Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: pr.value = 310367.40 gradient_to_present(0.08, 30, 3000)
# Result: pr.value = 310367.40 gradient_to_present(0.08, 30, 3000)
interest_during_construction
calculate interest during construction
using a monthly discount factorCompute interest during construction
interest_during_construction
calculate interest during construction
using a monthly discount factor
interest_during_construction(i, duration, capital)
interest_during_construction(i, duration, capital)
i |
interest rate in percent per year |
duration |
construction duration in months |
capital |
first/capital cost |
idc
Engineer, U. S. A., & Resources, W. National Economic Development (NED) Procedures Manual- National Development Costs. U.S. Army Corps of Engineers Humphreys Engineer Center Support Activity Institute for Water Resources, DACWC72-90(June)1993.
# Result: idc ($) = 18992.14 interest_during_construction (0.027, 25, 700000)
# Result: idc ($) = 18992.14 interest_during_construction (0.027, 25, 700000)
om_distribute
Distribute periodic present value operations and maintenance costs
over a project life span, discount over project, and compute present valueCalculate the present value of periodic operations and maintenance costs
om_distribute
Distribute periodic present value operations and maintenance costs
over a project life span, discount over project, and compute present value
om_distribute(i, n, fq, OM)
om_distribute(i, n, fq, OM)
i |
discount rate in percent per year |
n |
life span in years |
fq |
frequency of cost in years |
OM |
operation and maintenance cost incurred at each interval in present value |
OM_dist
Add citation as needed.
#Result is the present value cost of periodic operations and maintenance expenses. # Result: idc ($) = 8174.547 om_distribute(0.03, 50, 3, 1000)
#Result is the present value cost of periodic operations and maintenance expenses. # Result: idc ($) = 8174.547 om_distribute(0.03, 50, 3, 1000)
present_to_annual
Compute uniform series annual payments from present value
using capital recovery factor (crf)Compute annual payment from present value
present_to_annual
Compute uniform series annual payments from present value
using capital recovery factor (crf)
present_to_annual(i, n, PV)
present_to_annual(i, n, PV)
i |
discount rate in percent per year |
n |
life span in years |
PV |
present value |
ann.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: ann.value = $17765.49 present_to_annual(0.08, 30, 200000)
# Result: ann.value = $17765.49 present_to_annual(0.08, 30, 200000)
present_to_future
calculate future value from present value using
compound amount factor (caf)
present_to_future(i, n, PV)
present_to_future(i, n, PV)
i |
discount rate in percent per year |
n |
life span in years |
PV |
present value |
fr.value
Newnan, D. G., Eschenbach, T. G., Lavelle, J. P., & Oxford, N. Y. Engineering Economic Analysis, 14th ed. New York, Oxford University Press, 2020
David, W., & Terry, R. Fundamentals of Engineering Economics and Decision Analysis. Springer Nature, 2012
# Result: fr.value = 9056391 present_to_future (0.08, 30, 900000)
# Result: fr.value = 9056391 present_to_future (0.08, 30, 900000)