data(Baker2009)
Baker2009
if (FALSE) {
# 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, exac, total, studlab = paste(study, year),
data = Baker2009, sm = "OR")
# Conduct network meta-analysis
#
net1 <- netmeta(p1, ref = "plac")
# Conduct component network meta-analysis
#
cnet1 <- netcomb(net1)
cnet1
}
Run the code above in your browser using DataLab