如何将ggplot条形图的边缘设置为指定轴值？

你的问题出在coord_flip()的轴映射逻辑上——翻转坐标系后，x和y轴的对应关系会互换，之前用coord_cartesian(ylim=c(0,0.4))或xlim没生效，大概率是顺序不对或者限制错了轴。

给你两种可行的解决方法：

方法一：先限制原数值轴，再翻转坐标系 #

先通过coord_cartesian()限制原始y轴（也就是你要截断的数值轴）的范围，再执行坐标系翻转，这样就能正确截断条形：

library(ggplot2)
data("iris")

ggplot(data = iris, aes(x = Species, y = Petal.Width/Petal.Length)) + 
  geom_bar(stat = "identity", position = "identity") + 
  scale_y_continuous(n.breaks = 9, labels = scales::percent_format(style_negative = "parens")) +
  coord_cartesian(ylim = c(0, 0.4)) + # 先限制原数值y轴范围
  coord_flip() # 再翻转坐标系

方法二：在翻转时直接限制新数值轴 #

因为coord_flip()会把原y轴转换成水平的新x轴，所以可以直接在coord_flip()里设置xlim参数来截断：

library(ggplot2)
data("iris")

ggplot(data = iris, aes(x = Species, y = Petal.Width/Petal.Length)) + 
  geom_bar(stat = "identity", position = "identity") + 
  scale_y_continuous(n.breaks = 9, labels = scales::percent_format(style_negative = "parens")) +
  coord_flip(xlim = c(0, 0.4)) # 翻转时直接限制新x轴（原y轴）范围

这两种方法都能让水平条形图的右侧边缘固定在0.4的位置，完美截断virginica类别的过长条形。

内容的提问来源于stack exchange，提问作者KJF16