# NOT RUN {
if (requireNamespace("metafor", quietly = TRUE)) {
library(metafor)
df <-
escalc(
measure = "RR",
ai = tpos,
bi = tneg,
ci = cpos,
di = cneg,
data = dat.bcg
)
meta_analysis <- rma(yi, vi, data = df, method = "EB")
tidy(meta_analysis)
}
# }
Run the code above in your browser using DataLab