如何在ggplot中正确添加x̄=17格式的标签？

问题 #

我已经掌握了在ggplot标签中添加x̄的方法：

library(ggplot2)
ggplot() +
  geom_text(mapping= aes(x= 5, y= 5, label= "bar(x)"), parse= TRUE)

但我需要添加类似x̄=17的标签。尝试geom_text(mapping= aes(x= 5, y= 5, label= "bar(x)= 17"), parse= TRUE)时，因为等号被解析而失效。目前我采用双geom_text拼接的方法：

ggplot() +
  geom_text(mapping= aes(x= 5, y= 5, label= "bar(x)"), parse= TRUE) +
  geom_text(mapping= aes(x= 5.3, y= 5, label= "=17")) +
  scale_x_continuous(limits= c(0, 10))

这个方法在部分场景显示正常，但当数据刻度不同或使用facet_grid()时，x̄与=17会出现错位。请问如何正确添加x̄=17的标签？

解决方案 #

在ggplot的解析模式（parse=TRUE）中，plotmath语法要求用==表示等式，直接将完整表达式写入label即可避免拆分标签导致的错位问题。此外还有两种替代方案：

方法1：plotmath等式语法 #

直接使用bar(x) == 17作为标签内容，plotmath会自动解析为x̄=17的格式：

library(ggplot2)
ggplot() +
  geom_text(aes(x=5, y=5, label="bar(x) == 17"), parse=TRUE) +
  scale_x_continuous(limits = c(0,10))

方法2：动态拼接表达式（适合变量数值） #

如果数值是动态生成的（比如从数据中提取的均值），用paste()组合符号与数值，再通过解析模式渲染：

library(ggplot2)
mean_val <- 17
ggplot() +
  geom_text(aes(x=5, y=5, label=paste0("bar(x) == ", mean_val)), parse=TRUE) +
  scale_x_continuous(limits = c(0,10))

方法3：直接使用Unicode字符（无需解析） #

直接输入Unicode的x̄字符（x̄），关闭解析模式即可直接显示：

library(ggplot2)
ggplot() +
  geom_text(aes(x=5, y=5, label="x̄=17")) +
  scale_x_continuous(limits = c(0,10))

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