如何使用 ggplot2 在表达式中进行替换？答案

【问题标题】：How do I substitute within an expression using ggplot2?如何使用 ggplot2 在表达式中进行替换？
【发布时间】：2011-04-09 01:23:55
【问题描述】：

我想得到下标为 2 的 beta 乳胶符号。

以下代码：

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

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

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

【问题讨论】：

【解决方案1】：

使用 bquote。这是一个示例代码sn-p

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

【讨论】：