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