使用 R 在元分析中结合森林图和红绿灯图答案

【问题标题】：Combining forest plot and traffic light plot in meta-analysis using R使用 R 在元分析中结合森林图和红绿灯图
【发布时间】：2021-03-20 01:40:51
【问题描述】：

软件 Revman 在元分析中生成了森林图和红绿灯图的组合（参见例如 doi：http://dx.doi.org/10.1136/bmjopen-2018-024444，图 3）。我正在使用包meta fot meta-analysis 和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-plots 的图。结果应该如下图所示。

【问题讨论】：

您所说的“类似于 与 Revman-plots 是什么意思？”如果您想将多个图组合成一个图形，其他 R 包（如 gridExtra 或 cowplot）允许您使用 ggplots 来实现。这是一个带有一些选项的线程：stackoverflow.com/q/1249548/6288065
重要的是偏倚项目的风险与研究名称保持一致。如果您尝试使用 gridExtra 执行此操作，您将不得不对每个图进行处理，直到来自森林图的研究与偏差行的风险保持一致。我希望这是有道理的..
目前正在将其添加到robvis 包中。请参阅：github.com/mcguinlu/robvis/issues/102 如果您安装软件包的开发版本，也许可以让它工作。

标签： r meta forestplot metafor

【解决方案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))

【讨论】：