r - ggplot2：geom_text() 和 facet_grid()？

Question

我只想为 ggplot2 生成的每个图形面板添加注释；每个角落只有简单的标签，如 (a)、(b)、(c) 等。有没有一种简单的方法可以做到这一点？

Answer 1

来自：https ://groups.google.com/forum/?fromgroups=#!topic/ggplot2/RL8M7Ut5EpU您可以使用以下内容：

library(ggplot2) 
x <-runif(9, 0, 125) 
data <- as.data.frame(x) 
data$y <- runif(9, 0, 125) 
data$yy <- factor(c("a","b","c")) 

ggplot(data, aes(x, y)) + 
    geom_point(shape = 2) + 
    facet_grid(~yy) + 
    geom_text(aes(x, y, label=lab),
        data=data.frame(x=60, y=Inf, lab=c("this","is","the way"),
             yy=letters[1:3]), vjust=1)

这应该给你这个：

Answer 2

基本上，您创建一个data.frame包含文本列的文本，以及一个包含您用于的变量的列facet_grid。然后，您可以简单地添加 a geom_textwith that data.frame。geom_text有关文本放置等的更多详细信息，请参阅文档。