如何在R语言legend的bquote中添加文本实现类似today X5的效果？

要在图例的数学表达式前添加普通文本，只需在bquote内部用~连接文本与数学表达式即可，以下是修正后的完整代码：

x <- 1:100
y <- x^2
plot(x, y)
i <- 5
legend("topleft",
       legend = c(
         as.expression(bquote("today" ~ X[.(i)])),
         as.expression(bquote("tomorrow" ~ X[.(i)]))
       ), 
       col = c(1, 2), 
       pch = c(2, 3))

原理说明 #

之前的错误写法是直接将字符串与表达式生硬拼接，而bquote需要用特定语法组合不同内容：

• ~ 符号可以在文本和数学表达式之间添加空格，同时确保数学符号（如下标X[.(i)]）正确渲染
• 如果需要自定义文本与表达式的分隔方式，也可以使用paste函数，例如：bquote(paste("today", X[.(i)], sep = "-"))，能实现类似today-X5的效果

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