dat.egger2001 | R Documentation |
Results from 16 trials examining the effectiveness of intravenous magnesium in the prevention of death following acute myocardial infarction.
dat.egger2001
The data frame contains the following columns:
id | numeric | trial id number |
study | character | first author or trial name |
year | numeric | publication year |
ai | numeric | number of deaths in the magnesium group |
n1i | numeric | number of patients in the magnesium group |
ci | numeric | number of deaths in the control group |
n2i | numeric | number of patients in the control group |
The dataset includes the results from 16 randomized clinical trials that examined the effectiveness of intravenous magnesium in the prevention of death following acute myocardial infarction. Studies 1-7 were included in the meta-analyses by Teo et al. (1991) and Horner (1992) and were combined with the results from the LIMIT-2 trial (Woods et al., 1992) in Yusuf et al. (1993), suggesting that magnesium is an effective treatment for reducing mortality. However, the results from the ISIS-4 mega trial (ISIS-4 Collaborative Group, 1995) indicated no reduction in mortality with magnesium treatment. Publication bias has been suggested as one possible explanation for the conflicting findings (Egger & Davey Smith, 1995).
The present dataset includes some additional trials and are based on Table 18.2 from Egger, Davey Smith, and Altman (2001).
medicine, cardiology, Peto's method, publication bias
Wolfgang Viechtbauer, wvb@metafor-project.org, https://www.metafor-project.org
Egger, M., Davey Smith, G., & Altman, D. G. (Eds.) (2001). Systematic reviews in health care: Meta-analysis in context (2nd ed.). London: BMJ Books.
Egger, M., & Davey Smith, G. (1995). Misleading meta-analysis: Lessons from “an effective, safe, simple” intervention that wasn't. British Medical Journal, 310(6982), 752–754. https://doi.org/10.1136/bmj.310.6982.752
Horner, S. M. (1992). Efficacy of intravenous magnesium in acute myocardial infarction in reducing arrhythmias and mortality: Meta-analysis of magnesium in acute myocardial infarction. Circulation, 86(3), 774–779. https://doi.org/10.1161/01.cir.86.3.774
ISIS-4 Collaborative Group (1995). ISIS-4: A randomised factorial trial assessing early oral captopril, oral mononitrate, and intravenous magnesium sulphate in 58,050 patients with suspected acute myocardial infarction. Lancet, 345(8951), 669–685. https://doi.org/10.1016/S0140-6736(95)90865-X
Teo, K. K., Yusuf, S., Collins, R., Held, P. H., & Peto, R. (1991). Effects of intravenous magnesium in suspected acute myocardial infarction: Overview of randomised trials. British Medical Journal, 303(6816), 1499–1503. https://doi.org/10.1136/bmj.303.6816.1499
Woods, K. L., Fletcher, S., Roffe, C., & Haider, Y. (1992). Intravenous magnesium sulphate in suspected acute myocardial infarction: Results of the second Leicester Intravenous Magnesium Intervention Trial (LIMIT-2). Lancet, 339(8809), 1553–1558. https://doi.org/10.1016/0140-6736(92)91828-v
Yusuf, S., Teo, K., & Woods, K. (1993). Intravenous magnesium in acute myocardial infarction: An effective, safe, simple, and inexpensive treatment. Circulation, 87(6), 2043–2046. https://doi.org/10.1161/01.cir.87.6.2043
dat.li2007
### copy data into 'dat' and examine data dat <- dat.egger2001 dat ## Not run: ### load metafor package library(metafor) ### meta-analysis of trials 1-7 using Peto's method (as in Teo et al., 1991) res <- rma.peto(ai=ai, n1i=n1i, ci=ci, n2i=n2i, data=dat, subset=1:7) print(res, digits=2) ### meta-analysis of trials 1-7 and LIMIT-2 (as in Yusuf et al., 1993) res <- rma.peto(ai=ai, n1i=n1i, ci=ci, n2i=n2i, data=dat, subset=c(1:7,14)) print(res, digits=2) ### meta-analysis of all trials except ISIS-4 res <- rma.peto(ai=ai, n1i=n1i, ci=ci, n2i=n2i, data=dat, subset=-16) print(res, digits=2) predict(res, transf=exp, digits=2) ### meta-analysis of all trials including ISIS-4 res <- rma.peto(ai=ai, n1i=n1i, ci=ci, n2i=n2i, data=dat) print(res, digits=2) predict(res, transf=exp, digits=2) ### contour-enhanced funnel plot centered at 0 funnel(res, refline=0, level=c(90, 95, 99), shade=c("white", "gray", "darkgray")) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.