在荟萃分析中结合森林图和交通灯图

Question

Revman 软件在荟萃分析中生成森林图和交通灯图的组合（例如 doi：http://dx.doi.org/10.1136/bmjopen-2018-024444，图 3）。我使用

meta

软件包进行荟萃分析，使用

robvis

软件包进行偏倚风险。以下是一些使用包中示例数据的简单代码：

#creating a forest plot
library(meta)
m <- metacont(n.amlo, mean.amlo, sqrt(var.amlo),
              n.plac, mean.plac, sqrt(var.plac),
              data = amlodipine, studlab = study)
forest(m)

#creating a risk of bias traffic light plot
library(robvis)
rob_traffic_light(data_rob2, tool = "ROB2")

重要的是森林图中的行（即每个单独的研究）和偏差风险图的行是对齐的。使用

gridExtra

等软件包的问题在于，您必须调整对齐方式和大小或绘图，直到适合为止。我的问题是，R 中是否有一个很好的解决方法来获取与 Revman 图类似的图。结果应该如下图所示。

Answer 1

这里有一些开始构建你的情节的想法。

library(meta)
data(amlodipine)
m <- metacont(n.amlo, mean.amlo, sqrt(var.amlo),
              n.plac, mean.plac, sqrt(var.plac),
              data = amlodipine, studlab = study)  

library(ggplotify)
p1 <- as.ggplot(~forest(m), scale = 1, hjust = 0, vjust = 0)

library(robvis)
p2 <- rob_traffic_light(data_rob2, tool = "ROB2")

library(patchwork)
graphics.off()
dev.new(width=15,height=6)
wrap_plots(p1, p2, widths=c(9,2), heights=c(15,1))