在ggplot轴标题中表示斜体和上标

nou*_*use 4 r ggplot2

对不起,我要问这个,但我似乎无法得到这个表达权在包括ylab()xlab()一个GGPLOT2对象的参数.它需要阅读:

" 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")
Run Code Online (Sandbox Code Playgroud)

Rol*_*and 6

所有必要的信息都可以在help("plotmath").

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

结果情节

  • 不是那个下标,不是上标吗? (2认同)