I\'m using the meta R package to create a forest plot:
meta
library(meta) m1 <- metacont(10 + 1:4, 1:4, c(1:2, 3, 4), 10 + 1