# NOT RUN {
data(parkinson)
# Only consider first four studies (to reduce runtime of example)
#
p1 <- pairwise(list(Treatment1, Treatment2, Treatment3),
n = list(n1, n2, n3),
mean = list(y1, y2, y3),
sd = list(sd1, sd2, sd3),
data = subset(parkinson, Study < 5),
studlab = Study)
net1 <- netmeta(p1)
ni1 <- netimpact(net1, verbose = TRUE)
ni1
netgraph(ni1)
# }
Run the code above in your browser using DataLab