r - ggplot轴标题中斜体和上标的表达

Question

很抱歉问这个问题，但我似乎无法正确地将这个表达式包含在 ggplot2 的 ylab() 或 xlab() 参数中-目的。需要阅读:

“2q(稀有)”。不过，“2”需要加上上标。

我摆弄了expression()和paste()，但这似乎是不可能的。非常感谢任何帮助。

编辑:一些示例:

dat<-as.data.frame(matrix(runif(100), 10,10))
names(dat) <- LETTERS[1:10]

library(ggplot2)
ggplot(dat, aes(A,B)) +
  geom_point()+
  xlab("some title")

Answer 1

所有必要的信息都可以在 help("plotmath") 中找到。

ggplot(dat, aes(A,B)) +
  geom_point()+
  xlab(expression({}^2*italic(q)~textstyle(group("(", rarefied, ")"))))