如何在R ggplot中限制Y轴且不丢失任何绘图数据？

当你用scale_y_continuous(limits = ...)设置Y轴范围时，ggplot会直接过滤掉超出这个范围的数据行，所以那些点或标记自然不会被绘制。要实现「轴范围固定，但超出范围的元素仍能显示」的需求，你需要用coord_cartesian()来替代，它只是调整绘图的可视区域，不会删除任何数据。

修复你的基础示例 #

把scale_y_continuous换成coord_cartesian，再加上clip = "off"确保超出轴范围的元素能显示：

x <- 1:10
y <- x
df <- data.frame(x,y)

ggplot(df, aes(x=x,y=y)) +
  geom_point() +
  coord_cartesian(ylim = c(0, 5), clip = "off")

运行后你会看到Y轴显示0-5，但x>5的点会出现在Y轴顶部的上方区域（只要绘图窗口有足够的顶部空间）。

适配你的实际需求：三点线图+显著性标记 #

针对你需要在Y轴到400的图上方添加显著性标记的场景，这里给出完整示例：

模拟数据+绘图代码 #

library(ggplot2)

# 构造类似你的三点线图数据
set.seed(123)
df <- data.frame(
  group = rep(c("实验组", "对照组"), each=3),
  time_point = rep(c("T1", "T2", "T3"), 2),
  value = c(rnorm(3, 250, 40), rnorm(3, 350, 40))
)

# 绘制带显著性标记的图
ggplot(df, aes(x=time_point, y=value, color=group, group=group)) +
  geom_line(linewidth=1) +
  geom_point(size=3) +
  # 核心：限制Y轴可视范围为0-400，关闭裁剪允许外部元素显示
  coord_cartesian(ylim = c(0, 400), clip = "off") +
  # 手动添加显著性线条和星号（位置可以根据你的需求调整）
  geom_segment(aes(x=1.8, xend=2.2, y=420, yend=420), color="black", inherit.aes = FALSE) +
  geom_text(aes(x=2, y=435, label="***"), size=6, inherit.aes = FALSE) +
  # 调整顶部边距，避免标记被截断
  theme(plot.margin = margin(2, 1, 1, 1, "cm"))

关键参数说明 #

• coord_cartesian(ylim = c(0, 400))：只控制Y轴的显示范围，不会过滤任何数据，包括你添加的显著性标记。
• clip = "off"：默认情况下ggplot会把超出绘图区域的元素裁剪掉，开启这个参数后，Y轴上方的标记就能正常显示。
• plot.margin：必须调整顶部边距，否则显著性标记可能会被图片的边框截断。

如果你用ggsignif包自动生成显著性标记，同样可以套用这个逻辑：

library(ggsignif)

ggplot(df, aes(x=time_point, y=value, color=group, group=group)) +
  geom_line(linewidth=1) +
  geom_point(size=3) +
  coord_cartesian(ylim = c(0, 400), clip = "off") +
  geom_signif(
    y_position = 420, xmin=1.8, xmax=2.2,
    annotation="***", tip_length=0, color="black"
  ) +
  theme(plot.margin = margin(2, 1, 1, 1, "cm"))

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