# 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