geom_text在所有方面写入所有数据

Question

我使用ggplot和facet_grid，我想在每个方面指出每个方面的观察数量。我按照许多网站上提供的示例进行操作，但是当我将其写入任何内容时，它会在所有四个图上将所有四个观察数字叠加在一起。

这里是geom_text图层命令： geom_text（data = ldata，aes（x = xpos，y = ypos，label = lab，size = 1），group = NULL，hjust = 0，parse = FALSE）

和ldata是一个数据框，列出了每个图上的坐标（xpos，ypos）和观察数（实验室）。它在图上的正确位置打印数字，但所有四个都在所有四个图上相互重叠。我无法弄清楚我做错了什么。

LDATA：

xpos ypos lab

1 10 1.35 378

2 10 1.35 2

3 10 1.35 50

4 10 1.35 26

Answer 1

你几乎拥有它。您只需要在ldata数据框中再添加一列，这将是您向facet_grid提供的内容。 （我将Ypos改为Inf）

请注意下面splitter中ldata列的作用，以及facet_grid

中如何使用它

xpos <- c(10,10,10) 
ypos <- c(Inf,Inf,Inf)
lab <- c(378,2,50)
splitter <- c(1:3)
ldata <- data.frame(xpos, ypos, lab, splitter)


ggplot(mtcars) + geom_bar(aes(x=cyl)) + facet_grid(~splitter) + 
  geom_text(data=ldata, aes(x=xpos, y=ypos, 
                            label=lab, size=1), 
            vjust=2, parse=FALSE)

产生：