depreciation_interest: A function to calculate the costs of medical equipment

In tatooheene: Technology Appraisal Toolbox for Health Economic Evaluations in the Netherlands

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")
)

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

Value

A data frame with the annuity factor, yearly depreciation and interest costs, or the values 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")

tatooheene documentation built on April 3, 2025, 7:11 p.m.