# NOT RUN {
data(Woods2010)
p1 <- pairwise(treatment, event = r, n = N, studlab = author,
data = Woods2010, sm = "OR")
net1 <- netmeta(p1, small.values = "good")
ran1 <- rankogram(net1, nsim = 100)
ran1
plot(ran1)
# }
Run the code above in your browser using DataLab