如何消除ggplot2+sjPlot绘图中Y轴0-1500的空白间隔

问题原因 #

你当前使用scale_y_continuous仅设置了Y轴显示的刻度标签，但Y轴的坐标空间仍是从0到2000连续分配的——本质上只是隐藏了中间刻度，并没有真正截断轴的空间，因此0到1500之间的空白区域依然存在。

解决方案：使用ggbreak包实现Y轴截断 #

ggbreak是专门为ggplot2设计的轴截断工具，能直接压缩指定区间的空间，同时保留清晰的断点标记，避免误导读者。

步骤1：安装并加载ggbreak #

install.packages("ggbreak")
library(ggbreak)

步骤2：修改绘图代码 #

将原有的scale_y_continuous替换为scale_y_break，指定需要截断的区间，同时保留你需要的刻度和标签：

kcalPlot +
  ylab("Energy Intake (kcal)") +
  scale_y_break(
    breaks = c(100, 1400),  # 截断100到1400之间的区域，压缩空白
    limits = c(0, 2000),
    expand = c(0, 0),
    # 指定显示的刻度位置
    ticks = c(0, 1500, seq(1600, 2000, by = 100)),
    # 对应刻度的标签
    labels = c("0", "1500", "1600", "1700", "1800", "1900", "2000")
  )

说明 #

• breaks参数在scale_y_break中用于指定需要截断的区间（这里设置为100到1400，跳过0到1500之间的大部分空白）。
• 生成的图会在截断位置显示斜线标记，明确提示读者Y轴是截断的，符合数据可视化的规范。
• 不建议手动转换Y轴数值（比如将1500及以上的数值减去1500），这种方法会模糊数据的实际大小，容易误导解读。

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