In this lab, you will work to extend the network-based SEIR model into an SEIRS model by adding a transition for waning immunity. The specific learning objectives for this lab are to:
browser
mode for debugging
purposes;Once you are ready, start out by clearing your R object environment, to make sure that you do not have any objects lingering from the tutorial. This can be accomplished with:
rm(list = ls())
Next, make sure that you have your module script and analysis run file from the SEIR Tutorial ready in your working directory.
With your group, take the model in the SEIR Tutorial and extend it into an SEIRS model. Specific steps:
rbinom
again)
transition from R to S in the progression function. It is possible here
to just copy and paste what is happening with the other transitions, and
then modify the status attribute accordingly. You will need to update
the get_
functions to pull a new parameter,
rs.rate
.rs.flow
, at
each time step.rs.rate
, matching the model function.browser
mode to step through the new
functionality.After you have completed running the models above, please answer the following questions and discuss in your work group.
Last updated: 2022-07-07 with EpiModel v2.3.0