如何为 bquote 传递一串符号以在 ggplot 中进行评估？答案

【问题标题】：How do I pass a string of symbols for bquote to evaluate in ggplot?如何为 bquote 传递一串符号以在 ggplot 中进行评估？
【发布时间】：2019-06-20 20:56:22
【问题描述】：

我在函数中创建的 ggplot 的轴标签会有所不同。一些标签有上标/下标，而另一些则没有。示例：

  m.data <- data.frame(x = runif(10), y = runif(10))
  x.labs <- c("rain, mm", "light*','~W~m^-2")  
  for (i in 1:2) {
     ggplot(m.data, aes(x = x, y = y)) +
        labs(title = bquote(.(x.labs[i])))
  }

i=2 时图表的标题是字面意思

light*','~W~m^-2

而不是相同的格式化版本。结果相同，我还尝试在每个字符串中移动 bquote。

 x.labs <- c("bquote(rain*','~mm)", "bquote(light*','~W~m^-2)")

和

 title = x.labs[i]

在关于 ggplot 和 bquote 的众多问题中，似乎没有一个问题涉及像上标指示符这样的符号传递。

【问题讨论】：

可能类似于expression("light,"~W~m^-2) in xlabs?
如果您想将其发布为 [非常简短的] 答案，我很乐意接受。谢谢。

标签： r ggplot2

【解决方案1】：

另一种方法是在标题向量中使用expression()，而不是bquote()。

例如

x.labs <- c("rain, mm", expression("light,"~W~m^-2))

ggplot(m.data, aes(x = x, y = y)) +
    labs(title = x.labs[2])

【讨论】：