# NOT RUN {
data(sbp, package = "pimeta")
piex <- pimeta::pima(sbp$y, sbp$sigmak, method = "HTS")
cairo_pdf("forestplot.pdf", width = 6, height = 3, family = "Arial")
plot(piex, digits = 2, base_size = 10, studylabel = sbp$label)
dev.off()
# }
Run the code above in your browser using DataLab