ggplot轴标签中的下标字母

Question

另一张要发布的图表，有一天调整了ggplot2中的内容……我在抱怨吗？我不确定...dat <- data.frame(x = rnorm(100), y = rnorm(100))ggplot(dat, aes(x=x,y=y)) +    geom_point() +    labs(y=expression(Blah[1]))dat <- data.frame(x = rnorm(100), y = rnorm(100))ggplot(dat, aes(x=x,y=y)) +    geom_point() +    labs(y=expression(Blah[1d]))我正在尝试找出如何在轴标签中使用下标字母。第一个示例仅是一个数字而起作用，只要方括号中有一个字符，它就会失败。Blah [subscript（1d）]本质上是我所需要的，但是我无法弄清楚如何使它带有下标字母。尝试过包括paste（）等的变体。当然，更令人沮丧的是...labs(y=expression(Blah[12])) -这有效labs(y=expression(Blah[d])) -这有效labs(y=expression(Blah[d1])) -这有效labs(y=expression(Blah[1d])) -这失败了。有什么想法吗？