在 ggplot2 中的 coord_flip() 之后手动设置 x 轴上的限制和刻度

Question

我正在尝试使用我自己的数据从 Healy 的 数据可视化（第 116 页，复制到下面）中重现一个情节。当我设法重现该图时，我想手动编辑 x 轴上的限制和刻度。编码变得混乱，因为我需要使用 coord_flip() 来绘制情节。

x 轴应该从 0 到 6，每 1 个单位有刻度。我现在已经尝试了十几个选项，但没有一个能满足我的需求。希望有人对如何解决这个问题提出意见。

这是我的代码：

p <- ggplot(data = df, mapping = aes(x = reorder(group,-yvar), y = yvar))

p <- p + geom_pointrange(mapping = aes(ymin = lbci,
                                         ymax = ubci)) +
  labs(x= "", y= "yvar_label") + coord_flip() +
  geom_hline(yintercept = 5, linetype="dotted", color = "red", size=1.5) +
  theme_bw() 
p

Answer 1

您想要定义一个连续变量的轴，因此您应该为您的绘图使用scale_y_continuous() 函数，并定义您想要的中断。

这是一个虚拟示例：

library(ggplot2)
data(iris)
p <- ggplot(data = iris[c(1:3, 52:55, 102:105),], mapping = aes(x = reorder(Species,-Petal.Width), y = Petal.Width))

p + geom_pointrange(mapping = aes(ymin = 0, ymax = 3)) +
  labs(x= "", y= "yvar_label") + coord_flip() +
  geom_hline(yintercept = 5, linetype="dotted", color = "red", size=1.5) + 
  scale_y_continuous(breaks = seq(from = 0, to = 3, by = 0.5), limits = c(0,3)) + 
  theme_bw() 

编辑：对于绘图限制，您应该将 limits 参数提供给 scale_x/y_continuous() 函数。