R基础绘图中如何结合TeX与glue设置含数学公式的动态标题

场景需求 #

在R基础绘图的标题配置中，需要同时实现两个目标：

• 正常渲染LaTeX格式数学记号，包括希腊字母、上下标等公式元素
• 通过glue包动态插入变量取值，实现标题内容的动态生成

失效测试代码 #

直接在glue中拼接提前生成的TeX对象会导致LaTeX表达式无法解析，测试代码如下：

library(latex2exp)
library(glue)
v = "some dynamic text"
plot(5, 2, main=glue("{TeX('$I^2 +$')}{v}"))

失效原因 #

glue默认输出字符串类型对象，会将TeX()返回的表达式类结果强制转换为普通文本，导致LaTeX解析标记丢失，无法被绘图设备识别为数学公式。

可行实现方案 #

调整执行顺序：先用glue拼接出包含完整LaTeX标记的字符串，再将拼接结果整体传入TeX()做解析渲染。

基础写法（动态内容参与公式排版） #

library(latex2exp)
library(glue)
v = "some dynamic text"
plot(5, 2, main = TeX(glue("$I^2 + {v}$")))

优化写法（动态内容按纯文本排版） #

如果希望动态插入的变量内容保持正体、不套用数学公式的斜体样式，可以用LaTeX的\text{}命令包裹动态占位符，注意glue中需要用双大括号转义输出LaTeX需要的单大括号：

plot(5, 2, main = TeX(glue("$I^2 + \\text{{{v}}}$")))

注意事项 #

• 如果动态变量取值包含LaTeX特殊字符（如下划线_、百分号%、反斜杠\等），需要提前做转义处理，避免公式解析报错
• 该方案同样适用于坐标轴标签、图例文本等其他基础绘图支持表达式输入的位置

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