knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
$d$ --- day index.\ $g$ --- vaccination lag period (given).\ $w_d$ --- vaccine effectiveness on day $d$ (given).\ $v_d$ --- vaccine coverage on day $d$.\ $r_d$ --- flu incidence on day $d$.\ $b_d$ --- number of vaccinations of susceptible on day $d$.\
$d=0$ --- initial conditions.\ $d=1$ --- first timepoint (day) for which we have data.\ $N$ --- starting population size (given).\ $V_d$ --- vaccinations on day $d$ (given).\ $s_d^$ --- infections on day $d$ in absence of vaccination (given).\ $P_d^$ --- susceptible population on day $d$ in absence of vaccination.\ $s_d^a$ --- averted infections on day $d$.\ $s_d$ --- infections on day $d$.\
For $d=0$:
$A_0 = N$\ $b_0 = 0$\ $C_0 = 0$\ $D_0 = 0$\ $E_0 = 0$\ $F_0 = 0$\ $P_0^* = N$\ $s_0 = 0$\ $s_0^a = 0$\
For $d>0$ (order presented corresponds to the order of calculations):
Line $b_{d-1} ... b_{d-g}$ means that the same calculation is done on each $b_{d-i}$ from $i=1$ to $i=g$. The calculation being (in line 8) $b_{d-i}=b_{d-i}-r_db_{d-i}$.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.