get_amortization_10: Capitalize R&D (-10 years)

In TracyRage/fun_valuation: Personal fundamental analysis tool

Capitalize R&D (-10 years)

Description

Capitalize R&D investments 10 years back (Chemical, Auto/Truck, Drug, Machine, Maritime, Paper, Telecom Equipment, Water Utility, Heavy Manufacturing, Research with patenting).

Usage

get_amortization_10(cash_flows, amortized)

Arguments

amortized	Boolean Calculate amortized R&D
cashflows	List of numbers R&D spending the last 10 years

Value

Number Amortized or Unamortized portion of R&D

Examples

# List of cash flows
# cash_flow <- list(current=123, y1=333, y2=444, y3=444, y4=555, y5=666, y6=345, y7=556, y8=954, y9=3435, y10=111)
# Calculate unamortized portion of R&D
# unamortized_rnd <- get_amortization_10(cash_flows=cash_flow, amortized=FALSE)
# Calculate amortized portion of R&D
# amortized_rnd <- get_amortization_10(cash_flows=cash_flow, amortized=TRUE)

TracyRage/fun_valuation documentation built on Jan. 29, 2023, 8:41 a.m.