# NOT RUN {
data(Woods2010)
# Transform data from long arm-based format to contrast-based format
# Argument 'sm' has to be used for odds ratio as summary measure; by
# default the risk ratio is used in the metabin function called
# internally.
p1 <- pairwise(treatment, event = r, n = N,
studlab = author, data = Woods2010, sm = "OR")
p1
# Conduct network meta-analysis
net1 <- netmeta(p1)
net1
# Show forest plot
forest(net1, ref = "Placebo", drop = TRUE,
leftlabs = "Contrast to Placebo")
# }
Run the code above in your browser using DataLab