在ggplot2的 x 轴上添加公式或数学表达式主要有两种方法。简单来说就是将表达式作为一个字符串并在需要解析它的地方加上parse TRUE参数。 方法一添加轴标题 (xlab / labs)最直接的方法是使用xlab()或labs(x ...)配合expression()函数。这是为整个坐标轴添加一个带有上下标、特殊符号等数学注释的标题的标准方式。library(ggplot2)# 基础示例添加一个包含上标和希腊字母的标题ggplot(mtcars,aes(xwt,ympg))geom_point()xlab(expression(Weight (kg) *x*10^3))# 注意 * 表示并列# 多行或更复杂的表达式可以用 paste() 或 atop() 组合# 示例: 使用 atop() 创建两行标题并将第二行设为斜体ggplot(mtcars,aes(xwt,ympg))geom_point()xlab(expression(atop(CO[2]* concentration,italic(Lolium perenne))))关键点表达式中的普通文本需要用引号括起来如Weight变量和运算符之间用*连接表示并列用~表示空格。多行atop()可以将表达式分为上下两行很适合需要同时显示变量名和说明文字的情况。 方法二自定义刻度标签 (scale_x_*)如果你需要更改 x 轴刻度上的标签比如把 “A_1x” 显示为 A₁ₓ可以在scale_x_discrete()或scale_x_continuous()的labels参数中传入表达式。# 模拟数据data-data.frame(groupc(A_1x,A_2x,A_3x,A_4x),valuec(10,15,12,18))# 直接把表达式写成字符串my_labels-c(A[1*x],A[2*x],A[3*x],A[4*x])ggplot(data,aes(xgroup,yvalue))geom_bar(statidentity)scale_x_discrete(labelsparse(textmy_labels))# 关键点# 定义一个命名向量名字 数据中的原始值值 想要显示的表达式my_labels-c(A_1xA[5*x],A_2xA[6*x],A_3xA[7*x],A_4xA[8*x])ggplot(data,aes(xgroup,yvalue))geom_bar(statidentity)scale_x_discrete(labelsparse(textmy_labels)) 进阶使用扩展包 (gridmicrotex)如果你更习惯使用 LaTeX 语法来编写数学公式可以试试gridmicrotex包。它提供了element_latex()和annotate(latex, ...)等功能让你可以用$...$的方式在 ggplot2 中使用 LaTeX 数学公式。不过这需要安装额外的包。