在ggplot2中编号多个图

Question

我需要在页面上绘制多个图。我想在每个情节的左上角写一封信（例如A或B等）。我怎么用ggplot2做这个？

ggplot2手册（Hadley Wickham）中没有提到它，我也无法通过搜索网络索引找到它。

以下是一些可用于说明的代码。

library( ggplot2 )
p1 <- qplot( rnorm( 10 ), rnorm( 10 ) )
p2 <- qplot( rnorm( 10 ), rnorm( 10 ) )
grid.arrange( p1, p2, nrow=1 )

Answer 1

我建议将所有数据放在一个数据框中，并包含一个带有因子'a'，'b'等的变量，然后使用分面。所以例如像这样：

require('ggplot2')
df <- data.frame(cbind(rnorm(20),rnorm(20),c('A','B','C','X')))
ggplot(df, aes(x=X1,y=X2)) + geom_point() + facet_wrap(~ X3, ncol=2)

别介意丑陋的标签，但我认为它可以满足您的需求！

Answer 2

使用Cowplot可以解决这个问题。

plot_grid(p,q,labels=c('1','2'))

p和q是ggplot对象。