Calculate instantaneous discounted costs or qalys

Usage

disc_instant(lcldr = 0.035, lclcurtime, lclval)

Arguments

lcldr

The discount rate

lclcurtime

The time of the current event in the simulation

lclval

The value to be discounted

Value

Double based on discrete time discounting

Examples

disc_instant(lcldr=0.035, lclcurtime=3, lclval=2500)
#> [1] 2254.857