在R中手动设置含小数的X轴区间制作直方图是否可行？

我想要制作一款X轴为含小数区间的直方图，请问是否可行？
数据如下：

data=c(321.68 , 329.51 , 327.89 , 291.97 , 303.26 , 297.18 , 466.74, 
    251.75 , 327.12 , 283.10 , 282.87 , 244.96 , 296.46 , 264.03 ,
  388.35 , 220.89 , 244.98 , 254.59 , 322.18 , 319.80 , 356.25 , 310.51 , 
299.82 , 314.21 , 303.92 , 303.43 , 293.38 , 311.32 , 269.70 , 261.95 , 247.82 , 202.95 , 278.73 , 260.34 , 262.73 , 281.83)

例如第一个区间从202.95到246.915，我尝试过使用breaks命令，但效果不够直观。

完全可行，核心是通过自定义精确的小数区间断点，并优化轴标签的显示方式，就能得到直观的效果。下面提供两种常用实现方式：

基础R原生实现 #

手动指定包含小数的breaks参数，同时自定义标签并调整轴的显示逻辑，避免默认标签混乱：

# 自定义含小数的区间断点（覆盖数据最小/最大值）
custom_breaks <- c(202.95, 246.915, 290.88, 334.845, 378.81, 422.775, 466.74)
# 对应区间的可读标签
custom_labels <- c("202.95-246.915", "246.915-290.88", "290.88-334.845", 
                   "334.845-378.81", "378.81-422.775", "422.775-466.74")

# 绘制直方图，先隐藏默认X轴
hist(data, breaks = custom_breaks, col = "lightblue",
     xlab = "数值区间", ylab = "频数", main = "含小数区间的直方图",
     xaxt = "n")
# 手动添加X轴标签，放在区间中点并垂直显示避免重叠
axis(1, at = (custom_breaks[-1] + custom_breaks[-length(custom_breaks)])/2, 
     labels = custom_labels, las = 2, cex.axis = 0.8)

ggplot2实现（更灵活的可视化） #

用ggplot2可以更便捷地调整视觉细节，解决标签重叠问题：

library(ggplot2)

# 将数据转为数据框格式
df <- data.frame(value = data)

# 自定义区间断点
custom_breaks <- c(202.95, 246.915, 290.88, 334.845, 378.81, 422.775, 466.74)
custom_labels <- c("202.95-246.915", "246.915-290.88", "290.88-334.845", 
                   "334.845-378.81", "378.81-422.775", "422.775-466.74")

# 绘制直方图并调整轴显示
ggplot(df, aes(x = value)) +
  geom_histogram(breaks = custom_breaks, fill = "lightblue", color = "black") +
  scale_x_continuous(breaks = custom_breaks, labels = custom_labels) +
  labs(x = "数值区间", y = "频数", title = "含小数区间的直方图") +
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

关键注意事项 #

• 自定义断点必须覆盖数据的最小值（202.95）和最大值（466.74），避免数据被遗漏
• 若区间是等距的，可直接用seq()生成断点，比如seq(202.95, 466.74, by = 43.965)，比手动输入更高效
• 调整轴标签的角度、大小，保证可读性

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