我是 R 的新手,并且致力于使用 metafor
包的forest.default
实现创建具有数据集的森林图(我只有森林图数据中的x
、ci.ub
和ci.ub
)
我几乎完成了,我的绘图看起来与此类似,只是我的数据超过了图形顶部的黑色水平边框。我处理过它,但我有一个森林图总是与水平边界在同一行上,并且与白线叠加也无济于事,如这里所述。
我的问题是:如何向数据集添加间隙,以便森林图本身向上移动黑色边框?这是当前边界(当前叠加有白线)穿过我的数据的图的图像
谢谢!
编辑:这是代码片段
require(metafor)
metafor::forest(
x = as.vector(t(data_set[, forest_plot$mean])),
xlim = c(min_x_value - 2 * (plot_span), max_x_value),
alim = c(min_x_value , max_x_value),
ci.lb = as.vector(t(data_set[, forest_plot$low])),
ci.ub = as.vector(t(data_set[, forest_plot$high])),
col = "darkgoldenrod4",
ilab = display_data_matrix,
ilab.pos = 4,
annotate = FALSE,
slab = NA,
ilab.xpos = c(min_x_value - 2 * plot_span, min_x_value - 1.5 * plot_span, min_x_value - 0.75 * plot_span, min_x_value - 0.25 * plot_span),
rows = row_groupings,
xlab = paste(measure, ep_type, ep)
)
# print("e")
text(min_x_value - 2* plot_span, subgroup_rows, col = "brown3", pos = 4 , subgroup_titles, cex = 1.2)
header_line <- dim(data_set)[1] + gaps + 1
text( c(min_x_value - 2 * plot_span,
min_x_value - 1.5 * plot_span,
min_x_value - 0.75 * plot_span,
min_x_value - 0.25 * plot_span),
pos = 4,
cex = 1.4,
col = "darkorchid4",
header_line, c("Trial", "Randomized Treatment", "N Arm", "Time") )
abline(h=dim(data_set)[1]+1, lwd=2, col="white")
调整ylim
参数。执行以下操作:
sav <- forest(x = [...])
sav
(其中[...]
是代码的所有其余部分)。然后查看ylim
的默认值是什么。通过在上限值中添加 2 来调整此设置(因为您为子组标题添加了两行),然后在调用 forest()
中使用 ylim=c(lower,upper)
。