R 如何使'bquote'将存储在变量中的希腊字母替换为符号?

R 如何使'bquote'将存储在变量中的希腊字母替换为符号?,r,ggplot2,label,R,Ggplot2,Label,我想在绘图上动态标记轴。标签来自数据框,包含希腊字母以及超级/子脚本 在静态情况下,如果我知道标签的字母,bquote会很好地工作。但在标签字符串来自变量的情况下,bquote失败 这表明了我想要实现的目标: a <- "alpha" b <- "beta" ggplot(data.frame(x=c(1), y=c(1)), aes(x, y)) + geom_point() + labs(x = bquote(.(a)[.(b)])) + ## will output

我想在绘图上动态标记轴。标签来自数据框,包含希腊字母以及超级/子脚本

在静态情况下,如果我知道标签的字母,
bquote
会很好地工作。但在标签字符串来自变量的情况下,
bquote
失败

这表明了我想要实现的目标:

a <- "alpha"
b <- "beta"
ggplot(data.frame(x=c(1), y=c(1)), aes(x, y)) + 
  geom_point() +
  labs(x = bquote(.(a)[.(b)])) + ## will output the greek letters by "name"
  labs(y = bquote(alpha[beta]))  ## the greek letter-names are replaces by the symbols

a使用
rlang::sym
将a和b变量转换为符号

库(“tidyverse”)

a谢谢你的回答。它解决了问题中的问题。然而,我发现,这并不是我唯一的问题。也许你对我的后续问题感兴趣: