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

将%添加到代字号中：

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

Answer 2

您可以在方法2中将~替换为%~%（即parse = TRUE）。我还替换了mu＆amp;的unicode sigma与他们的希腊字母代表：

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