hksars: Hong Kong SARS outbreak 2003

Description Usage Details Source Examples

Description

Severe Acute Respiratory Syndrome (SARS) data from the 2003 outbreak in Hong Kong. Data contain the daily reported number of cases among health care and others as given in Figure 2 of Anonymous (2003). A susceptible population of 6.7 mio is assumed.

Usage

1
data("hksars")

Details

A constant incubation time of 6.4 days and a constant recovery time of 34 days as in Donnelly et al. (2003) is assumed. Figure 2 in Anonymous (2003) provides the exposure time. A homogenous population is assumed.

Source

Anonymous (2003). Sars bulletin. Technical report, Health, Welfare and Food Bureau, Government of the Hong Kong Special Administrative Region, 10 June 2003. Available as http://www.info.gov.hk/info/sars/bulletin/bulletin0610e.pdf

Donelly, C. A., Ghani, A. C., Leung, G. M., and 16 more authors (2003). Epidemiological determinants of spread of causal agent of severe acute respiratory syndrome in Hong Kong. The Lancet, 361:1761

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
data("hksars")

## Not run: 
#Show how to plot using EpiTools
require("epitools")
require("chron")

E <- chron("2/15/2003") + hksars@data$E
curve <- epicurve.dates(E,axisnames = FALSE,before=0, after=0,legend.text = TRUE,col = colorbrewer.palette(3, "seq", "r")[3:1],ylab="No. cases")
axis(1, at = curve$xvals, labels = curve$cmday, tick = FALSE, line = 0)
axis(1, at = curve$xvals, labels = curve$cmonth, tick = FALSE, line = 1)

## End(Not run)

RLadyBug documentation built on May 2, 2019, 5:50 p.m.