3

我是 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")
4

1 回答 1

1

您需要调整ylim参数。请执行下列操作：

sav <- forest(x = [...])
sav

（[...]其余的代码在哪里）。然后看看默认值ylim是什么。通过将 2 添加到上限值来调整此值（因为您为子组标题添加了两行），然后ylim=c(lower,upper)在您的调用中使用forest().

于 2017-01-05T19:27:51.360 回答