Paper繪圖 - 史上最全總結——R語言組圖、拼圖cowplot包－鑽石舞台

背景介紹

R語言作為一個常用的數據分析、科研繪圖軟件，在科研中應用比較廣泛。但一般情況下，R語言繪製出來的是單張圖，那麼如何將這些單張圖進行組合在一起，是使用R語言的人應該去學習的。

R語言組圖、拼圖適合於將R語言內繪製出來的圖進行組合、拼接；不適合將外部的圖形一起組圖。如果有外部的圖，如WB的照片連同R語言的圖片一起組合其實更推薦使用AI或者PS進行組圖。

軟件介紹

[軟件名稱]：R （Version 4.1.2）

[軟件名稱]：RStudio （Version 1.4.1106）

組圖R包——cowplot包

1.第一步還是安裝和加載該包，以及加載需要進行數據處理和繪圖的包

install.packages("cowplot")library(cowplot)library(tidyverse)

2.老規矩，先看該包的拼圖函數介紹

3.使用iris數據集做幾幅圖用來演示（iris數據集是R語言自帶的數據，你們加載包之後，直接複製粘貼就可以運行代碼了）

f1 <-ggplot(iris,aes(Species,Sepal.Length,fill=Species))+geom_boxplot()f2 <-ggplot(iris,aes(Species,Sepal.Width,fill=Species))+geom_boxplot() f3 <-ggplot(iris,aes(Species,Petal.Length,fill=Species))+geom_boxplot() f4 <-ggplot(iris,aes(Species,Petal.Width,fill=Species))+geom_boxplot()

4.我們開始進行拼圖，即可按照2 X 2進行拼圖

plot_grid(f1,f2,f3,f4)

5.我們給圖形加上相應的字母，如A，B，C等

plot_grid(f1,f2,f3,f4,labels = c("A","B","C","D"))

6.如果想把圖形拼成一行呢？對的，就是通過ncol和nrow兩個參數來控制即可。

plot_grid(f1,f2,f3,f4, ncol=4, labels = c("A","B","C","D"))

7.又或者你將圖改為3+1，即上面3個，第二行1個，如下代碼

plot_grid(f1,f2,f3,f4, ncol=3, nrow = 2, labels = c("A","B","C","D"))

8.對於標籤大小，標籤字體，標籤加粗（bold）/斜體（italic），標籤顏色，可以通過下面幾個標籤進行修改設置即可

plot_grid(f1,f2,f3,f4, ncol=3, nrow = 2, labels = c("A","B","C","D"), label_size = 15, label_fontfamily = "Arial", label_fontface = "italic", label_colour = "red")

9.對於標籤的位置調整，可以通過label_x（默認參數是0）和label_y（默認參數是1）來調整。

plot_grid(f1,f2,f3,f4, ncol=3, nrow = 2, labels = c("A","B","C","D"), label_size = 15, label_fontfamily = "Arial", label_fontface = "italic", label_colour = "red", label_x =0.02, label_y =0.3)

10.如果想圖形中留個空白怎麼整？

plot_grid(f1,NULL,f2,NULL,f3,f4, ncol=2, nrow = 3, labels = c("A","B","C","D","E","F"), label_size = 15, label_fontfamily = "Arial", label_fontface = "bold", label_colour = "red")