# \donttest{
# Generate some example data
data <- data.frame(
yi = c(0.2, 0.3, 0.1, 0.4, 0.25),
sei = c(0.1, 0.15, 0.08, 0.12, 0.09),
es_type = "SMD"
)
# Apply RoBMA method
result <- run_method("RoBMA", data)
print(result)
# }
Run the code above in your browser using DataLab