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)

下标的位置正确，但波浪线会转变为空格。

有什么建议可以让下标和波浪线同时出现吗？谢谢！

- MartineJ

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)

- Z.Lin

Answer 2

将 ~ 后面加上 % 即可:

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

- timfaber

---

更多详情请参见：http://vis.supstat.com/2013/04/mathematical-annotation-in-r/ - timfaber

在标题中，例如 labs(title = parse(text = "X[1] %~% N( \U03bc = 10, \U03c3 = 3)"))。 - PatrickT