Power law antibody boosting and waning model
antibody_model_typhoid(
i,
t1,
b,
immune_histories = NULL,
biomarker_states = NULL,
kinetics_parameters,
biomarker_map = NULL,
...
)individual
time
biomarker
An array of immune histories across all individuals, time steps and exposure IDs
An array of biomarker states (biomarker quantities) across all individuals, time steps and biomarker IDs
A tibble of parameters needed for the antibody kinetics model for all biomarkers
A table specifying the relationship between exposure IDs and biomarker IDs
Additional arguments
A biomarker_quantity is returned
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