betablocker {flexmix}

Clinical Trial of Beta-Blockers

Description

22-centre clinical trial of beta-blockers for reducing mortality after myocardial infarction.

Usage

data("betablocker")

Format

A data frame with 44 observations on the following 4 variables.

Deaths

Number of deaths.

Total

Total number of patients.

Center

Number of clinical centre.

Treatment

A factor with levels Control and Treated.

Source

G. McLachlan and D. Peel. Finite Mixture Models, 2000. John Wiley and Sons Inc. http://www.maths.uq.edu.au/~gjm/DATA/mmdata.html

References

M. Aitkin. Meta-analysis by random effect modelling in generalized linear models. Statistics in Medicine, 18, 2343–2351, 1999.

S. Yusuf, R. Peto, J. Lewis, R. Collins and P. Sleight. Beta blockade during and after myocardial infarction: an overview of the randomized trials. Progress in Cardiovascular Diseases, 27, 335–371, 1985.

Examples

data("betablocker", package = "flexmix")
betaMix <- initFlexmix(cbind(Deaths, Total - Deaths) ~ 1 | Center,
                       data = betablocker, k = 3, nrep = 5,
                       model = FLXMRglmfix(family = "binomial",
                         fixed = ~Treatment))