dat.franchini2012 | R Documentation |
Results from 7 trials examining the effectiveness of four dopamine agonists and placebo to reduce “off-time” in patients with advanced Parkinson disease.
dat.franchini2012
The data frame contains the following columns:
Study | character | study label |
Treatment1 | character | treatment 1 |
y1 | numeric | treatment effect arm 1 |
sd1 | numeric | standard deviation arm 2 |
n1 | integer | sample size arm 1 |
Treatment2 | character | treatment 2 |
y2 | numeric | treatment effect arm 2 |
sd2 | numeric | standard deviation arm 2 |
n2 | integer | sample size arm 1 |
Treatment3 | character | treatment 3 |
y3 | numeric | treatment effect arm 3 |
sd3 | numeric | standard deviation arm 2 |
n3 | integer | sample size arm 1 |
This network meta-analysis compared the effectiveness of four active treatments and placebo in patients with advanced Parkinson disease (Franchini et al., 2012). The outcome is mean lost work-time reduction in patients given dopamine agonists as adjunct therapy. The data are given as sample size, mean, and standard deviation in each trial arm.
This data set was used as an example in the supplemental material of Dias et al. (2013) where placebo is coded as 1 and the four active drugs as 2 to 5.
medicine, raw mean differences, network meta-analysis
Guido Schwarzer, sc@imbi.uni-freiburg.de, https://github.com/guido-s/
Dias, S., Sutton, A. J., Ades, A. E., & Welton, N. J. (2013). Evidence synthesis for decision making 2: A generalized linear modeling framework for pairwise and network meta-analysis of randomized controlled trials. Medical Decision Making, 33(5), 607–617. https://doi.org/10.1177/0272989X12458724
Franchini, A. J., Dias, S., Ades, A. E., Jansen, J. P., & Welton, N. J. (2012). Accounting for correlation in network meta-analysis with multi-arm trials. Research Synthesis Methods, 3(2), 142–160. https://doi.org/10.1002/jrsm.1049
### Show results from first three studies; third study is a three-arm ### study head(dat.franchini2012, 3) ## Not run: ### Load netmeta package suppressPackageStartupMessages(library(netmeta)) ### Print mean differences with two digits settings.meta(digits = 2) ### Transform data from wide arm-based format to contrast-based ### format. Argument 'sm' must not be provided as the mean difference ### is the default in R function metacont() called internally. pw <- pairwise(list(Treatment1, Treatment2, Treatment3), n = list(n1, n2, n3), mean = list(y1, y2, y3), sd = list(sd1, sd2, sd3), data = dat.franchini2012, studlab = Study, sm = "MD") ### Show calculated mean differences (TE) for first three studies pw[1:5, c(3:7, 10, 1)] ### Conduct network meta-analysis net <- netmeta(pw) net ### Draw network graph netgraph(net, points = TRUE, cex.points = 3, cex = 1.5, plastic = TRUE, thickness = "se.fixed", iterate = TRUE, start = "eigen") ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.