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(TE, seTE, treat1, treat2, studlab, data = p1)
net1
Run the code above in your browser using DataLab