ggplot2反向水平条形图固定刻度至0-50的实现问题

我明白你想要把反向水平条形图的刻度范围从0-30调整到0-50，之前尝试scale_y_discrete()和ylim()没成功的原因是因为你用了coord_flip()，轴的对应关系发生了变化，得针对正确的轴来调整范围才行。

下面是修改后的完整代码，已经把刻度固定在0到50之间：

mtcars$`car name` <- rownames(mtcars)
ggplot(mtcars, aes(x=`car name`, y=-mpg)) + 
  geom_bar(position = position_dodge(), stat = "identity", fill="red", colour="black") + 
  coord_flip() + 
  theme_classic() + 
  scale_x_discrete(name = "", position = "top") + 
  # 关键修改：调整刻度范围、断点和标签
  scale_y_continuous(
    name = "mpg", 
    breaks = seq(0, -50, by = -10), 
    labels = seq(0, 50, by = 10),
    limits = c(-50, 0)  # 固定原y轴范围，对应翻转后水平轴的0-50
  ) + 
  theme(axis.text.y = element_blank())

关键修改点说明： #

• 之前ylim()没生效的核心原因是coord_flip()改变了轴的对应关系：原代码里的y=-mpg在翻转后变成了水平方向的轴，单独用ylim()会被scale_y_continuous()的设置覆盖，所以要把范围设置在scale_y_continuous()内部。
• 我们设置limits = c(-50, 0)，因为y=-mpg是负值，负50对应刻度显示的正50，这样就固定了轴的范围。
• 同步更新breaks和labels参数，让刻度显示为0、10、20、30、40、50，和新的范围匹配。
• 不需要切换到scale_y_discrete()，因为mpg是连续数值类型，离散型刻度完全不适用，反而会导致错误。

这样调整之后，图表的水平轴刻度就会固定在0到50之间，即使你的mpg最大值不到30，也会保留到50的刻度范围。

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