R语言ggplot2如何保留下标标签中的前导零

问题描述 #

使用R语言ggplot2开展绘图工作时，若轴标签包含下标部分，下标内的前导零会被自动移除，无法按预期显示。

问题复现 #

可通过以下代码复现该问题：

library(ggplot2)

# 无下标的普通标签，可正常显示"01"
ggplot(mtcars, aes(x=as.factor(cyl), y=mpg)) + 
    geom_boxplot() +  
    xlab("cyl Box01")

# 带表达式下标的标签，前导零被移除，下标仅显示"1"
ggplot(mtcars, aes(x=as.factor(cyl), y=mpg)) + 
    geom_boxplot() +  
    xlab(expression(cyl~Box[01]))

两种写法的显示效果：

• 无下标标签效果：
• 未修正的含下标标签效果：

问题原因 #

R的plotmath表达式解析规则默认将未加引号的数值类内容按数字类型处理，而数字的前导零属于无意义字符会被自动省略，因此Box[01]中的01会被解析为数字1，导致前导零丢失。

解决方案 #

将下标位置的内容用双引号包裹，明确标记为文本字符串类型，解析器就会原样保留所有字符，不会自动省略前导零。
修正后的核心代码如下：

ggplot(mtcars, aes(x=as.factor(cyl), y=mpg)) + 
    geom_boxplot() +  
    # 下标内容加双引号，即可保留前导零
    xlab(expression(cyl~Box["01"]))

运行代码后，x轴标签的下标会正常显示为01，符合预期效果。

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