Expand parameter list to include variant strain

expand_params_variant(
  params,
  variant_prop = 0.01,
  variant_advantage = 1.5,
  variant_vax_efficacy_dose1 = 0.3,
  variant_vax_efficacy_dose2 = 0.8,
  variant_vax_mu_dose1 = NULL,
  variant_vax_mu_dose2 = NULL
)

Arguments

params

parameter list (e.g. read in with read_params())

variant_prop

current proportion of infections caused by the variant

variant_advantage

transmissibility advantage of variant compared to current dominant strain (as a multiplicative factor), e.g., a 50% more transmissible variant would have variant_advantage = 1.5.

variant_vax_efficacy_dose1

one-dose vaccine efficacy against variant (only used in vaxified model)

variant_vax_efficacy_dose2

two-dose vaccine efficacy against variant (only used in vaxified model)

variant_vax_mu_dose1

probability that an individual protected by one vaccine dose has a mild variant infection (if NULL, assume the same probability as for the resident strain)

variant_vax_mu_dose2

probability that an individual protected by two vaccine doses has a mild variant infection (if NULL, assume the same probability as for the resident strain)

Examples

params <- read_params("PHAC.csv")
params_variant <- expand_params_variant(params)