# load example data:
data("Rubin1981")
if (FALSE) {
# perform meta-analysis:
ma01 <- bayesmeta(y=Rubin1981[,"effect"], sigma=Rubin1981[,"stderr"],
labels=Rubin1981[,"school"], tau.prior="uniform")
# show meta-analysis results:
forestplot(ma01)
# show trace plot:
traceplot(ma01)
}
Run the code above in your browser using DataLab