tatooheene (version 0.19.0)

depreciation_interest: A function to calculate the costs of medical equipment

Description

A function to calculate the costs of medical equipment based on Section 3.3 of the Dutch EE guideline; k = annual depreciation and interest expense jaarlijkse afschrijvings- en rentekosten

Usage

depreciation_interest(
  v_replace_val,
  r_salvage_val,
  n_amortisation_period = 10,
  i_interest_rt = 0.025,
  output = c("data frame", "annuity factor", "annual cost")
)

Value

A data frame with the annuity factor, yearly depreciation and interest costs, or the values independently.

Arguments

v_replace_val

V: vervangingswaarde; replacement value

r_salvage_val

R: restwaarde; salvage value

n_amortisation_period

N: afschrijvingstermijn,; amortization period

i_interest_rt

i: renteperceof ntage; interest rate

output

Default of output is a data frame with both the annuity factor and yearly deprecation and interest costs, but the values can be selected independently

Examples

# Example usage of the depreciation_interest function
# Calculate both annuity factor and yearly depreciation and interest costs as a data frame
depreciation_interest(v_replace_val = 50000, r_salvage_val = 5000)

# Get only the annuity factor
depreciation_interest(v_replace_val = 50000, r_salvage_val = 5000, output = "annuity factor")

# Get only the annual depreciation and interest cost
depreciation_interest(v_replace_val = 50000, r_salvage_val = 5000, output = "annual cost")