r - 如何在绘图 (ggplot2) 的文本注释中放置 +/- 加减运算符？

Question

我尝试了以下方法，但对我不起作用:

a <- ggplot()
a <- a + geom_point(aes(x=seq(0,1,0.1), y=seq(0,1,0.1)))
a <- a + annotate("text", x=0.5, y=0.3, label="myplot")
a <- a + annotate("text", x=0.5,y=0.2,label=expression(%+-%))

正如 How to annotate() ggplot with latex 所指出的，我也尝试了以下操作没有运气:

a <- a + annotate("text", x=0.5, y=0.1, label="%+-%", parse=TRUE)

这也不起作用:

a <- a + annotate("text", x=0.5, y=0.1, label="\pm", parse=TRUE)

Answer 1

可以使用 unicode 表示( \u00B1 ):

a <- ggplot()
a <- a + geom_point(aes(x=seq(0,1,0.1), y=seq(0,1,0.1)))
a <- a + annotate("text", x=0.5, y=0.3, label="myplot")
a + annotate("text", x=0.5, y=0.2, label="\u00B1")

或者您可以使用 ±符号直接，通过从某处复制和粘贴它。

a + annotate("text", x=0.5, y=0.2, label="±")