Simple simulator to create a waiting list

Creates a simulated waiting list comprising referral dates, and removal dates

Usage

wl_simulator(
  start_date = NULL,
  end_date = NULL,
  demand = 10,
  capacity = 11,
  waiting_list = NULL,
  withdrawal_prob = NA,
  detailed_sim = FALSE
)

Arguments

start_date

date. The start date for the simulation

end_date

date. The end date for the simulation

demand

numeric. Weekly demand (ie. typical referrals per week)

capacity

numeric. Weekly capacity (ie. typical removals per week)

waiting_list

integer. The number of patients on the waiting list contains the referral dates

Value

dataframe. A df of simulated referrals and removals

Examples

over_capacity_simulation <-
  wl_simulator("2024-01-01", "2024-03-31", 100, 110)
under_capacity_simulation <-
  wl_simulator("2024-01-01", "2024-03-31", 100, 90)