Function to calculate non-linear waning All additional parameters for the function are declared here

wane_function(theta, time_infected, wane)

Arguments

theta

NumericVector, the named vector of model parameters

time_infected

double the time infected (sampling_time - circulation_time)

Value

value of waning parameter based on time since infected