multigroup.vaccine models infectious disease dynamics in
populations with multiple distinct subgroups that can have:
The package provides both an interactive shiny dashboard
for a simple two-group example and programmatic R functions for
epidemiological modeling and outbreak forecasting.
install.packages("multigroup.vaccine")install.packages("multigroup.vaccine",
repos = "https://epiforesite.r-universe.dev")# install.packages("remotes")
remotes::install_github("EpiForeSITE/multigroup-vaccine")The package depends on the following R packages:
deSolve,
graphics, shiny, stats,
bslib (>= 0.9.0), htmltools,
socialmixrknitr,
rmarkdown, testthat (>= 3.0.0)Launch the shiny dashboard for interactive modeling:
library(multigroup.vaccine)
run_my_app()The dashboard models two distinct sub-populations with differential within-group and across-group contact rates and different vaccination adherence levels. See Nguyen et al. (2024) and Duong et al. (2026) for more details on this modeling approach.
You can also use the package functions directly in R scripts. Here’s an example of comparing populations with different vaccination rates:
# Compare two populations with different vaccination rates
results <- finalsize(
popsize = c(10000, 10000), # Equal population sizes
R0 = 2, # Basic reproduction number
contactmatrix = matrix(1, 2, 2), # Equal and symmetric group-to-group contact
relsusc = c(1, 1), # Equal group susceptibility per at-risk contact
reltransm = c(1, 1), # Equal group transmissibility per at-risk contact
initR = c(0, 0), # Initially none previously infected & immune (R)
initI = c(1, 0), # One initial infectious case (I) in first group
initV = c(1000, 2000), # Initial numbers immune by vaccination (V)
method = "analytic" # Solve for final size analytically
)
print(results)For examples of other functions or more complex scenarios, see the package vignettes.
shiny dashboard for
scenario explorationComprehensive documentation and vignettes are available at: https://epiforesite.github.io/multigroup-vaccine/
View all available vignettes:
browseVignettes("multigroup.vaccine")finalsize(): Master function for final outbreak size
calculations and simulationscontactMatrixPropPref(): Generate contact matrices from
proportionate mixing and preferential contact assumptionscontactMatrixPolymod(): Generate age-structured contact
matrices from POLYMOD datagetCensusData(): Download and process US Census Bureau
population data for age group-structured modelsrun_my_app(): Launch the interactive shiny
dashboard for a two-group modelIf you use this package in your research, please obtain citation information in R:
citation("multigroup.vaccine")For local development:
# Clone the repository
# git clone https://github.com/EpiForeSITE/multigroup-vaccine.git
# Install development dependencies
install.packages(c("devtools", "roxygen2", "pkgdown", "lintr"))
# Load the package for development
devtools::load_all()
# Run tests
devtools::test()
# Check package
devtools::check()This project is licensed under the MIT License - see the LICENSE.md file for details.
This package is part of the EpiForeSITE software ecosystem developed by the ForeSITE Group at the University of Utah. Development was supported by the Centers for Disease Control and Prevention’s Center for Forecasting and Outbreak Analytics (Cooperative agreement CDC-RFA-FT-23-0069).