##
## Note: Contrary to these data, in Krahn et al. (2013) slightly
## different standard errors related to individual studies are used
## calculated by the function 'metacont' of R package 'meta'.
##
data(Senn2013)
##
## Generation of an object of class 'netmeta' with
## reference treatment 'plac', i.e. placebo
##
net1 <- netmeta(TE, seTE, treat1, treat2, studlab,
data=Senn2013, sm="MD", reference="plac")
##
## Decomposition of Cochran's Q
##
decomp.design(net1)
Run the code above in your browser using DataLab