Title: | Estimate Asymptomatic Cases via Capture/Recapture Methods |
---|---|
Description: | Estimate the lower and upper bound of asymptomatic cases in an epidemic using the capture/recapture methods from Böhning et al. (2020) <doi:10.1016/j.ijid.2020.06.009> and Rocchetti et al. (2020) <doi:10.1101/2020.07.14.20153445>. Note there is currently some discussion about the validity of the methods implemented in this package. You should read carefully the original articles, alongside this answer from Li et al. (2022) <doi:10.48550/arXiv.2209.11334> before using this package in your project. |
Authors: | Hugo Gruson [cre, aut, cph] |
Maintainer: | Hugo Gruson <[email protected]> |
License: | GPL-3 |
Version: | 1.1.0.9000 |
Built: | 2024-09-30 06:06:44 UTC |
Source: | https://github.com/bisaloo/asymptor |
Estimate the proportion of asymptomatic cases by capture/recapture
estimate_asympto(date, cases, deaths, bounds = c("lower", "upper"))
estimate_asympto(date, cases, deaths, bounds = c("lower", "upper"))
date |
A vector containing the dates |
cases |
A numeric vector containing the number of new cases at each
|
deaths |
A numeric vector containing the number of new deaths at each
|
bounds |
|
A data.frame
with two or three columns (depending on the value of
the bounds
argument):
date
: the original date
column
lower
: the lower bound of asymptomatic cases
upper
: the upper bound of asymptomatic cases
Please note there is currently some discussion about the validity of the methods implemented in this package. You should read carefully the original articles, alongside this answer from Li et al. (2022) before using this package in your project.
Böhning D., Rocchetti I., Maruotti A., Holling H. (2020), Estimating the undetected infections in the Covid-19 outbreak by harnessing capture–recapture methods, International Journal of Infectious Diseases, 97, p197-201, doi:10.1016/j.ijid.2020.06.009.
Rocchetti I., Böhning D., Holling H., Maruotti A., (2020), Estimating the size of undetected cases of the SARS-CoV-2 outbreak in Europe: An upperbound estimator, medRxiv, doi:10.1101/2020.07.14.20153445.
Li M., Dushoff J., Earn D.J.D., Bolker B.M. (2022), Evaluating undercounts in epidemics: responsi to Maruotti et al. 2022, arXiv, doi:10.48550/ARXIV.2209.11334.
d <- readRDS(system.file("extdata", "covid19_italy.rds", package = "asymptor")) head(d) estimate_asympto(d$date, d$new_cases, d$new_deaths)
d <- readRDS(system.file("extdata", "covid19_italy.rds", package = "asymptor")) head(d) estimate_asympto(d$date, d$new_cases, d$new_deaths)