# NOT RUN {
if (require("metafor")) {
data(dat.bcg)
dat <- escalc(measure = "RR", ai = tpos, bi = tneg, ci = cpos, di = cneg, data = dat.bcg)
model <- rma(yi, vi, data = dat, method = "REML")
model_performance(model)
}
# }
Run the code above in your browser using DataLab