如何在ggplot中自动设置Y轴的中线小数点？

问题背景 #

需要给ggplot图表的Y轴数值替换成中线小数点（对应Unicode字符\U00B7），但手动截取字符串的方法只能处理特定格式的数值，遇到负数、整数或者不同小数位数时就会失效，缺乏通用性。

通用解决方法 #

直接使用scales包的label_number()函数，通过指定decimal.mark = "\U00B7"参数，就能自动把所有数值的小数点替换成中线小数点，完全不用手动处理字符串，适配各种数值情况。

代码示例 #

1. 加载必要包

library(ggplot2)
library(scales)

2. 生成包含多种数值类型的测试数据

set.seed(123)
df_test <- data.frame(
  x = rep(c("Group1", "Group2"), each=50),
  y = rnorm(100, mean=0, sd=2)
)

3. 原始图表（默认小数点）

ggplot(df_test, aes(x=x, y=y)) +
  geom_boxplot() +
  scale_y_continuous(breaks = seq(-5, 5, 1.5)) +
  theme_minimal()

4. 手动方法的局限性（仅作对比）

手动截取字符串的方式只能固定处理某一类格式的数值，遇到负数、整数就会出错：

y_labels <- format(seq(-5, 5, 1.5), nsmall=1)
ggplot(df_test, aes(x=x, y=y)) +
  geom_boxplot() +
  scale_y_continuous(breaks = seq(-5, 5, 1.5),
                     labels = paste0(substr(y_labels, 1, 2), "\U00B7", substr(y_labels, 4, 4))) +
  theme_minimal()

5. 通用解决方案（推荐）

这个方法能完美适配正负值、整数、不同小数位数的数值：

ggplot(df_test, aes(x=x, y=y)) +
  geom_boxplot() +
  scale_y_continuous(breaks = seq(-5, 5, 1.5),
                     labels = label_number(decimal.mark = "\U00B7")) +
  theme_minimal()

方案优势 #

• 自动适配正负值：负数的负号会被正确保留，仅替换小数点部分
• 兼容整数与小数：整数不会被强制添加小数点，小数部分正常显示中线点
• 支持不同小数位数：不管是1位、2位还是更多小数，都能精准替换

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