从Metafor的注释中删除上下CI

Question

我正在使用Metafor软件包来绘制森林图，我想知道是否有人知道从文本注释中省略上下CI的方法，例如，其中一组是参考，结果固定为1。

这里是一个例子：

library(metafor)

par(mar=c(5,4,1,2))

forest(x     = c(1, 0.9, 1.1),
       ci.ub = c(1, 0.98, 1.18),
       ci.lb = c(1, 0.82, 1.02),
       refline = 1)

我只想从研究1行中删除[1.00，1.00]，只剩下1.00。

我唯一想到的可能性是在这些颜色的顶部绘制白色的东西，但这很奇怪，而且我有很多组的大型复杂图。

Answer 1

您可以使用通过调用forest函数所产生的图形，使用选项annotate = FALSE删除右侧的注释。之后，您可以选择使用功能text添加您自己的文本（可能性有限），如下面的代码所示。

library(metafor)
par(mar=c(5,4,1,2))

forest(x     = c(1, 0.9, 1.1),
       ci.ub = c(1, 0.98, 1.18),
       ci.lb = c(1, 0.82, 1.02),
       refline = 1,
       annotate = FALSE,   ### added
       )

text(x = c(1.25, 1.25, 1.25), y = c(3, 2, 1), 
     label=c("1.00", "0.90", "1.10"))

这将产生以下图形：