Outbreak: Dataset from an outbreak of food poisoning on a sportsday,...
In epiDisplay: Epidemiological Data Display Package

Outbreak investigation

R Documentation

Dataset from an outbreak of food poisoning on a sportsday, Thailand 1990.

Description

This dataset contains information from an outbreak investigation concerning food poisoning on a sportsday in Thailand 1990.

Dichotomous variables for exposures and symptoms were coded as follow:

	0	= no
	1	= yes
	9	= missing or unknown

Usage

data(Outbreak)

Format

A data frame with 1094 observations on the following 13 variables.

id: a numeric vector
sex: a numeric vector

	0	= female
	1	= male

age: a numeric vector: age in years

	99	= missing

exptime: an AsIs or character vector of exposure times
beefcurry: a numeric vector: whether the subject had eaten beefcurry
saltegg: a numeric vector: whether the subject had eaten salted eggs
eclair: a numeric vector: pieces of eclair eaten

	80	= ate but could not remember how much
	90	= totally missing information

water: a numeric vector: whether the subject had drunk water
onset: an AsIs or character vector of onset times
nausea: a numeric vector
vomiting: a numeric vector
abdpain: a numeric vector: abdominal pain
diarrhea: a numeric vector

References

Thaikruea, L., Pataraarechachai, J., Savanpunyalert, P., Naluponjiragul, U. 1995 An unusual outbreak of food poisoning. Southeast Asian J Trop Med Public Health 26(1):78-85.

Examples

data(Outbreak)
.data <- Outbreak
# Distribution of reported pieces of eclair taken
attach(.data)
tab1(eclair) 

# Defining missing value
.data$eclair[.data$eclair > 20] <- NA
detach(.data)
attach(.data)
pieces.of.eclair <- cut(eclair, c(0,1,2,20), include.lowest=TRUE, right=FALSE)
tabpct(pieces.of.eclair, diarrhea)
rm(list=ls())
detach(.data)

epiDisplay documentation built on May 18, 2022, 5:11 p.m.