R ggplot2用下标和代字号注释

Question

我试图用一个标签标注ggplot2图，该图表明X1〜N（mu = 10，sigma = 3）的分布，其中1表示下标，如下所示：

label1<-"X[1] ~ N( \U03bc = 10, \U03c3 = 3)"

当我像这样使用label1时：

library(ggplot2)
label1<-"X[1] ~ N( \U03bc = 10, \U03c3 = 3)"
ggplot() + annotate("text", x=18,y=0.05,label=label1)

下标将被忽略，剩下的就是所需的。

当我像这样使用label1时：

library(ggplot2)
label1<-"X[1] ~ N( \U03bc = 10, \U03c3 = 3)"
ggplot() + annotate("text", x=18,y=0.05,label=label1,parse=TRUE)

下标绘制正确，但是波浪符号在一个空格中转换。

有什么建议如何使下标和波浪号发生吗？谢谢！

Answer 1

您可以在方法2中替换~为%~%（即parse = TRUE）。我还用其希腊字母表示形式替换了mu＆sigma的unicode：

label1 <- "X[1] %~% N(mu == 10, sigma == 3)"
ggplot() + 
  annotate("text", x=18, y=0.05, label=label1, parse=TRUE)

Answer 2

添加%到波形符，如下所示：

label1<-"X[1] %~% N( \U03bc = 10, \U03c3 = 3)"