get_severe_age_Shenzhen: Model the probability of Covid19 outcome type (mild,...

In epicentre-msf/covidestim: Estimates Of Epidemiological Parameters For COVID19

Description

Adapted from https://github.com/HopkinsIDD/covidSeverity

Usage

get_severe_age_Shenzhen(outcome = c("severe", "moderate", "mild"),
  nsamples = 2000)

Arguments

outcome	Outcome category ("severe", "moderate", or "mild")
nsamples	Number of samples to draw (defaults to 2000)

Value

A data.frame with nsamples rows and 8 columns, corresponding to each age group ('0-9', '10-19', ..., '70+')

Author(s)

Patrick Barks <[e-mail]>

Source

Bi, Q., Wu, Y., Mei, S., Ye, C., Zou, X., Zhang, Z., Liu, X., Wei, L., Truelove, S., Zhang, T., Gao, W., Cheng, C., Tang, X., ..., and Feng, .T. (2020) Epidemiology and Transmission of COVID-19 in Shenzhen China: Analysis of 391 cases and 1,286 of their close contacts. medRxiv preprint. https://doi.org/10.1101/2020.03.03.20028423

Examples

# draws from the posterior distribution of probability of severe outcome
post_samples <- get_severe_age_Shenzhen("severe")

# posterior median probability of severe outcomes for each age group
apply(post_samples, 2, median)

epicentre-msf/covidestim documentation built on Jan. 1, 2021, 1:06 a.m.