r - 如何使用 ggplot2 在表达式中进行替换？

Question

我想获得下标为 2 的 beta 的 latex 符号。

以下代码:

idx <- 2;
ylab(eval(expression(paste("beta[",idx,"]",sep=""))))

产生标签“beta[2]”而不是“\beta_{2}”。我究竟做错了什么？

注:要查看我想要什么，只需使用 ylab(expression(beta[2])) ，但我想从变量中取出值 idx而不是使用硬编码值。

Answer 1

使用 bquote。这是一个示例代码片段

library(ggplot2)
p1 = qplot(tip, data = tips)
idx = 2;
my.ylab = bquote(beta[2] == .(idx))
p1 + ylab(my.ylab)