如何在繪圖（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

["

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")

Answer 2

這有效：

a0 <- ggplot()
a0 <- a0 + geom_point(aes(x=seq(0,1,0.1), y=seq(0,1,0.1)))
a0 + annotate("text", x=0.5, y=0.1, label="'' %+-% '' ", parse=TRUE)

關鍵思想是%+-%是一個操作符，所以它必須對某些東西進行操作，即它必須是x %+-% y的形式； 在這種情況下，我將x和y設為空白字符串。

您還可以使用phantom() ：

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

如果你想使用像\pm這樣的 LaTeX 風格的標記，你需要進入tikzDevice的兔子洞。