# NOT RUN {
# setup
set.seed(123)
library(metaplus)
# renaming to what `statsExpressions` expects
df <- dplyr::rename(mag, estimate = yi, std.error = sei)
# creating expression (changing few defaults)
expr_meta_robust(
data = df,
random = "normal",
k = 4,
messages = TRUE,
plotci = TRUE
)
# }
Run the code above in your browser using DataLab