## execute analysis
if (FALSE) {
data(ep)
ep$design = factor(ep$d1,labels = c("prospective", "retrospective"))
m.ep <- metadiag(ep, re = "sm", re.model = "SeSp",
split.w = TRUE,
df.estimate = TRUE)
plotw(m.ep)
#Relationship between conflict and study design
plotw(m.ep, group = "design")
}
Run the code above in your browser using DataLab