R高级|利用cowplot包拼接图片（1）基本操作
R高级|利用cowplot包拼接图片（1）基本操作
有时候，我们想把画的几幅图拼接在一起，在R中，cowplot包提供了将图片拼在一起的方法。
cowplot最佳的适应对象是ggplot2包画的图，但是也可以画其他命令画的图，今天我们先将ggplot2画的图拼在一起。
0、安装cowplot包
install.packages('cowplot')调用cowplot包
library(cowplot)1、准备4幅图
先用ggplot2画4幅图：A、B、C、D
library(ggplot2)
A<- ggplot(mtcars,aes(mpg, hp)) +
geom_point()
A
B<- ggplot(mtcars,aes(mpg)) + geom_histogram()
B
C<- ggplot(mtcars,aes(mpg)) + geom_dotplot()
C
D<- ggplot(mtcars,aes(y = mpg)) +
geom_boxplot(aes(fill=gear))
D
2、用plot_grid命令将这4附图拼在一起
plot_grid(A,B,C,D)
3、对齐方式
对齐的参数是align，水平对齐h（horizontally ）、垂直对齐v（vertically ），同时水平和垂直对齐hv
plot_grid(A,B,C,D,align = 'h')
plot_grid(A,B,C,D,align = 'v')
plot_grid(A,B,C,D,align = 'hv')4、指定行列数
比如，我们想把4个图片画成1行，那就将nrow设置成1
plot_grid(A,B,C,D,nrow = 1)
我们看到，第四幅图与前三幅图没有完全对齐，我们使用align='h'来设置水平对齐。
plot_grid(A,B,C,D,nrow = 1,align = 'h')
我们想把4个图片画成1列，那就将ncol设置成1
plot_grid(A,B,C,D,ncol = 1)
我们看到图片左右两边没有对齐，我们添加align='v'，来设置垂直方向对齐。
plot_grid(A,B,C,D,ncol = 1,align = 'v')
5、设置图片的相对高度与相对宽度
rel_heights和rel_widths，rel的意思是relative，设置的是列或行的相对高度和相对宽度
相对高度：第1行的高度是第2行的2倍
plot_grid(A,B,C,D,rel_heights = c(2,1))
相对宽度：第1列的宽度是第2列的2倍
plot_grid(A,B,C,D,rel_widths = c(2,1))
6、添加A、B、C、D4个标签
plot_grid(A,B,C,D,
labels = c('A','B','C','D'))
设置标签的颜色（label_colour）、位置（label_x、label_y）、字体（label_fontface、label_fontfamily）、大小（label_size）
plot_grid(A,B,C,D,
labels = c('A','B','C','D'),
label_colour = 'red',
label_x = 0.01,
label_y = 1.02,
label_fontface = 1,
label_size = 16)
label_fontface主要设置加粗、倾斜这些，用数字1、2、3、4---这些就行，
label_fontfamily主要设置字体的类型，比如黑体等。
当然还可以使用hjust和vjust来水平和竖直调整标签的相对位置，比如hjust=-0.5
7、设置每一个图片的大小
使用scale来设置每一个图片的大小，不是整张图片的大小
plot_grid(A,B,C,D,scale = c(0.7))
8、设置边距
边距是设置整个图片的边距，边距设置的顺序是上、右、下、左
plot_grid(A,B,C,D)+
theme(plot.margin = unit(c(1,2,3,4), "cm"))
9、使用list把4个图片捆在一起
有时候，你需要把所有的图片都放在一起，然后做出图，那就使用list
再把对象赋值给plotlist参数
pic4=list(A,B,C,D)
plot_grid(plotlist = pic4)
10、调节图片之间的距离
下次讲------
腾讯云开发者
