r - ggplot2 facet_wrap 的文本标签

我在 facet_wrapped ggplot2 图形上放置字母标签时遇到问题。它应该很简单，我以前做过……虽然显然我现在做的事情不对。当每个图中应该有一个不同的字母时，这些字母只是在每个图中彼此重叠。最近有什么变化还是我忽略了显而易见的事情？

library(ggplot2)
library(reshape2)
posdat<-data.frame(  x=c(rep(10,4)),
                     y=c(rep(0.4,4)),
                   lab=c("A","B","C","D"),
                    stringsAsFactors = FALSE)
sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point(shape=1)
sp+geom_text(data=posdat, aes(x=10, y=0.4, label=lab))+
facet_wrap( ~ day, ncol=2)

最佳答案

如果您将 day 标识符添加到您的 posdat 数据中，则文本可以在各个方面之间拆分。

posdat$day <- unique(tips$day)

sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point(shape=1)
sp+geom_text(data=posdat, aes(x=10, y=0.4, label=lab))+
  facet_wrap( ~ day, ncol=2)

关于r - ggplot2 facet_wrap 的文本标签，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/32000449/