如何让ggplot2直方图固定在设定分位数breaks内，不受异常值影响？

首先，基于数据分位数手动设定breaks，建议避开极端异常值对应的分位点（比如取到99%分位数而非100%），避免断点被异常值拉伸：

library(ggplot2)
set.seed(123)
# 构造带极端异常值的示例数据
data <- data.frame(value = c(rnorm(1000, 50, 10), 200, 210))

# 基于分位数计算断点，取0%、25%、50%、75%、99%分位数
breaks <- quantile(data$value, c(0, 0.25, 0.5, 0.75, 0.99))

接下来，用geom_histogram()指定breaks，再通过coord_cartesian()设置x轴显示范围——它不会过滤数据，只是缩放绘图视图，能完整保留所有基于分位数定义的区间：

ggplot(data, aes(x = value)) +
  geom_histogram(breaks = breaks, fill = "steelblue", color = "white") +
  # 仅限制显示范围，不丢弃任何数据
  coord_cartesian(xlim = c(min(breaks), max(breaks))) +
  labs(title = "基于分位数断点的直方图（排除极端异常值视图）", x = "数值", y = "频数")

核心差异说明 #

xlim()会直接过滤超出范围的数据点，若最后一个区间的部分数据被过滤，该区间会因无数据而隐藏；coord_cartesian()仅调整绘图窗口，底层数据和基于全量数据计算的直方图区间都会保留，只是异常值部分不在视图中展示。

若需要明确提示异常值存在，可在标题或注释中补充说明，比如添加“（注：超出99%分位数的2个异常值未在视图中显示）”。

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