R语言annotate函数中VT1的1设置为下标问题求助

方法1：使用bquote()（推荐，更灵活） #

bquote()可以在表达式中直接嵌入动态变量值，同时保留下标格式：

annotate("text", x=VT1PPO_CAD-2, y=40,
         label=bquote(VT[1]~":"~.(round(VT1PPO_CAD, 0))~"%"), 
         angle=90, size = 4)

• VT[1]：实现T的下标1效果
• .(round(VT1PPO_CAD, 0))：把计算后的数值插入到表达式中
• ~：用来添加空格，保证文本和数值之间的排版间隔

方法2：使用expression()配合parse=TRUE #

通过拼接可解析的表达式字符串，让ggplot自动解析下标格式：

annotate("text", x=VT1PPO_CAD-2, y=40,
         label=paste0("VT[1]: ", round(VT1PPO_CAD, 0), "%"),
         angle=90, size = 4, parse=TRUE)

• 把原有的VT1写成VT[1]
• 添加parse=TRUE参数，告诉ggplot将label内容解析为数学表达式，从而渲染下标

为什么你之前的写法不生效？ #

你之前用paste0(expression(paste("V", T[1], ": ")), round(VT1PPO_CAD, 0), "%")的问题在于：
expression()返回的是表达式对象，和字符串直接拼接时会被强制转为字符文本（比如变成"expression(paste(\"V\", T[1], \": \"))"），而不是被ggplot解析为带格式的表达式，所以下标不会生效。

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