Power law antibody boosting and waning model

antibody_model_typhoid(
  i,
  t1,
  b,
  immune_histories = NULL,
  biomarker_states = NULL,
  kinetics_parameters,
  biomarker_map = NULL,
  ...
)

Arguments

i

individual

t1

time

b

biomarker

immune_histories

An array of immune histories across all individuals, time steps and exposure IDs

biomarker_states

An array of biomarker states (biomarker quantities) across all individuals, time steps and biomarker IDs

kinetics_parameters

A tibble of parameters needed for the antibody kinetics model for all biomarkers

biomarker_map

A table specifying the relationship between exposure IDs and biomarker IDs

...

Additional arguments

Value

A biomarker_quantity is returned

Examples

tmp_pars <- list()
tmp_pars[[1]] <- draw_parameters_random_fx(1,1,1,NULL,NULL,example_model_pars_typhoid)
tmp_immune_history <- array(0,dim=c(1,11,2))
tmp_immune_history[1,1,1] <- 1
antibody_model_typhoid(1,10, 1, tmp_immune_history, NULL, tmp_pars,example_biomarker_map_numeric)
#> [1] 188.4761