R中的並排森林地塊

Question

所以這是一些通用數據。 我目前使用metafor包和par()函數來並排繪制這些圖。 但是，我想理想地擺脫第二個圖中的研究列和兩個圖中的日志RR估計。 我希望兩個森林地塊也能更緊密地聯系在一起。 很抱歉以前沒有提供數據 - 我是新來的。

library(metafor)
par(mfrow=c(1,2))

### load BCG vaccine data
data(dat.bcg)
### calculate log relative risks and corresponding sampling variances
dat <- escalc(measure="RR", ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg)
### default forest plot of the observed log relative risks
forest(dat$yi, dat$vi)
### default forest plot of the observed log relative risks for second plot
forest(dat$yi, dat$vi)

===============================

有誰知道如何在r中制作一個並排的森林情節？ 我希望左側有子組名，然后是右側的兩個森林圖（彼此相鄰）有點像這樣http://www.nature.com/ng/journal/v43/n8/images_article/ng .882-F1.jpg但更簡單。

我已嘗試使用metafor包的par()函數，但它不起作用。

Answer 1

這讓你非常接近：

library(metafor)
data(dat.bcg)
dat <- escalc(measure="RR", ai=tpos, bi=tneg, ci=cpos, di=cneg, data=dat.bcg)

par(mfrow=c(1,2))
par(mar=c(5,4,1,1))
forest(dat$yi, dat$vi, annotate=FALSE, cex=.8, at=seq(-3,2,1), digits=1, xlim=c(-6,2))
text(0, 15, "Figure 1", cex=.8, font=2)
par(mar=c(5,3,1,2))
forest(dat$yi, dat$vi, annotate=FALSE, slab=rep("",length(dat$yi)), cex=.8, at=seq(-3,2,1), digits=1, xlim=c(-5,3))
text(0, 15, "Figure 2", cex=.8, font=2)