ggplot：geom_text打印的文字不清楚

Question

使用geom_text打印的文字不是很清楚。我怎样才能说得更清楚？

data = data.frame(rnorm(1000))
colnames(data) = "numOfX"
m <- ggplot(data, aes(x=numOfX))
m + geom_histogram(colour = "blue", fill = "white", binwidth = 0.5) +
  annotate("segment", x=10,xend=10,y=20,yend=0,arrow=arrow(), color="blue") +
  geom_text(aes(10, 30, label="Observed \n value"), color = "blue") 

Answer 1

使用annotate作为文字和箭头：

m + geom_histogram(colour = "blue", fill = "white", binwidth = 0.5) +
  annotate("segment", x=10,xend=10,y=20,yend=0,arrow=arrow(), color="blue") +
  annotate("text", x=10, y=30, label="Observed \n value", color = "blue")

---

原因是geom_text过度绘制了数据框中每行数据的文本，而annotate仅将文本绘制一次。正是这种过度绘制导致了粗体的像素化文本。

我相信这个问题最近得到了解答。我会尝试找一个参考： 最近有人提出了类似的问题：

• ggplot2: Is there a fix for jagged, poor-quality text produced by geom_text()?
• How to nicely annotate a ggplot2 (manual)