如何在R包森林图中添加第二条垂直线

Question

我想在我的森林图中区分统计显着性（OR = 1.0）和临床显着性（OR = 1.5）。我使用forestplot包创建了此图，示例代码如下。是否可以添加垂直线（同时保持线没有差异）？

library(forestplot) 
test_data <- structure(list(
    mean = c(NA, NA, 1, 0.5, 2), 
    lower = c(NA, NA, .5, .25, 1.5), 
    upper = c(NA, NA, 1.5, .75, 2.5)), 
    .Names = c("mean", "lower", "upper"), 
    row.names = c(NA, -5L), 
    class = "data.frame") 

tabletext <- cbind(
    c("", "Outcome", "Outcome 1", "Outcome 2", "Outcome 3"), 
    c("", "OR", "1 (0.5 - 1.5)", "0.5 (0.25 - 0.75)", "2.0 (1.5 - 2.5)")) 

forestplot(tabletext, 
     test_data, 
     new_page = TRUE, 
     xlog = TRUE, 
     boxsize = .25 
     ) 

Answer 1

甲次优（和不是很优雅）解决方案可以是：1-创建一个空的曲线图，没有轴或标签，2-然后绘制垂直线（abline(v=1.5)）和3-打电话给你forestplot与new_page = F。