如何让ggplot2的geom_bar从y=1而非原点开始绘制？

这个需求其实可以通过数据转换+自定义y轴刻度标签来实现——因为ggplot的geom_bar(stat="identity")默认是从y=0起画的，我们没法直接改变它的起始点，但可以“伪装”出从y=1开始的视觉效果，具体步骤如下：

步骤1：转换数据，计算偏移量 #

先把你的原始数值转换成相对于y=1的偏移值：大于1的数值会是正数（向上延伸），小于1的会是负数（向下延伸）。举个示例：

library(ggplot2)
# 构造示例数据
df <- data.frame(
  category = c("A", "B", "C", "D"),
  value = c(2.5, 1.2, 0.8, 0.5)
)
# 计算相对于y=1的偏移量
df$offset <- df$value - 1

步骤2：绘制条形图并自定义y轴 #

用偏移量作为y轴的绘制值，然后通过scale_y_continuous()把轴上的刻度标签改回原始数值，同时可以加一条水平线标记y=1的起始位置：

ggplot(df, aes(x = category, y = offset)) +
  geom_bar(stat = "identity", fill = "#4682B4") +
  # 自定义y轴：把偏移量刻度转换成原始数值标签
  scale_y_continuous(
    breaks = seq(-1, 1.5, 0.5),  # 这里是偏移量的刻度位置
    labels = seq(-1, 1.5, 0.5) + 1,  # 加上1还原成原始数值标签
    expand = c(0, 0)  # 可选：消除轴边的空白，让条形紧贴起始线
  ) +
  # 添加y=1的水平线（对应偏移量的y=0）
  geom_hline(yintercept = 0, color = "black", size = 0.8) +
  labs(y = "原始数值", x = "分类") +
  theme_bw()

原理说明 #

这样操作后，视觉上条形就像是从y=1开始绘制的：数值大于1的条形向上延伸，小于1的向下延伸，而y轴显示的还是你需要的原始数值，完全不需要修改轴的范围——只是通过数据转换和标签替换实现了需求。

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