R語言ggplot2拼圖包patchwork安裝使用
引言
patchwork是基于ggplot2的拼圖包，因為ggplot2本身沒有強大的拼圖語法，而一般使用的gridExtra與cowplot的拼ggplot2圖形都存在不少問題。
我關注這個包蠻久了，現(xiàn)在Github上的Star數(shù)已經遠超大部分的R包，但似乎還沒有發(fā)布到CRAN。我的工作看似跟作圖相關，寫的博文大多數(shù)也如此，但實際對圖形的掌控力并不咋的，所以還是要多多學習。
下面進入正題，掌握好ggplot2與patchwork的基本用法，一般的圖形都可以搞定了，并必要搞的很復雜。解決問題是關鍵，認真工作也是關鍵，畫圖看起來是，其實不是。
安裝
# 需要提取安裝好devtools包，
# 如果你解決安裝和載入包很麻煩，可以試試pacman包，我在簡書寫了介紹和簡單使用
devtools::install_github("thomasp85/patchwork")
導入：
p_load(patchwork) # 或 # library(patchwork)
例子
patchwork的使用灰常簡單，使用+把要拼的圖加在一起就可以了。
library(ggplot2) library(patchwork) p1 <- ggplot(mtcars) + geom_point(aes(mpg, disp)) p2 <- ggplot(mtcars) + geom_boxplot(aes(gear, disp, group = gear)) p1 + p2
我們不用創(chuàng)建對象，也可以像ggplot2本身使用一樣相加。
ggplot(mtcars) + geom_point(aes(mpg, disp)) + ggplot(mtcars) + geom_boxplot(aes(gear, disp, group = gear))
另外，可以使用布局函數(shù)plot_layout對拼接細節(jié)進行更細致地指定，像每個圖的范圍，圖形的排列。
p1 + p2 + plot_layout(ncol = 1, heights = c(3, 1))
如果你想要在圖形之間添加一些空間，可以使用plot_spacer()填充一個空白格。
p1 + plot_spacer() + p2
增加花括號的使用進行嵌套可以布置更復雜的圖形：
p3 <- ggplot(mtcars) + geom_smooth(aes(disp, qsec))
p4 <- ggplot(mtcars) + geom_bar(aes(carb))
p4 + {
p1 + {
p2 +
p3 +
plot_layout(ncol = 1)
}
} +
plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
括號也是可以的：
p3 <- ggplot(mtcars) + geom_smooth(aes(disp, qsec))
p4 <- ggplot(mtcars) + geom_bar(aes(carb))
p4 + (
p1 + (
p2 +
p3 +
plot_layout(ncol = 1)
)
) +
plot_layout(ncol = 1)
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
高級特性
除了將圖形添加到一起，patchwork定義了一些有意思的操作符，，簡化了上面的嵌套語法。-操作符將左右兩邊的對象放在同一個嵌套層，而不是像+號把右邊放入左邊的嵌套層。
p1 + p2 + p3 + plot_layout(ncol = 1) ## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
p1 + p2 - p3 + plot_layout(ncol = 1) ## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
現(xiàn)在p1+p2與p3在同一嵌套層。
|與/操作符可以用來水平和垂直布局。
(p1 | p2 | p3) /
p4
## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
子圖多的時候同時修改圖形比較麻煩，patchwork提供了*與&用來簡化代碼，它們都可以將同一個操作應用到所有圖形。
(p1 + (p2 + p3) + p4 + plot_layout(ncol = 1)) * theme_bw() ## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
需要注意*只會應用到當前嵌套層。
p1 + (p2 + p3) + p4 + plot_layout(ncol = 1) & theme_bw() ## `geom_smooth()` using method = 'loess' and formula 'y ~ x'
&可以用遞歸的方式應用到所有層面。
以上就是R語言ggplot2拼圖包patchwork安裝使用的詳細內容，更多關于R語言ggplot2拼圖包patchwork的資料請關注腳本之家其它相關文章！
相關文章
這篇文章主要介紹了如何用R語言繪制函數(shù)曲線圖，幫助大家更好的理解和學習使用R語言，感興趣的朋友可以了解下2021-03-03
這篇文章主要介紹了R語言編碼問題的解決，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
R語言中矩陣matrix和數(shù)據(jù)框data.frame的使用詳解
這篇文章主要介紹了R語言中矩陣matrix和數(shù)據(jù)框data.frame的使用詳解，文中通過示例代碼介紹的非常詳細，對大家的學習或者工作具有一定的參考學習價值，需要的朋友們下面隨著小編來一起學習學習吧2021-03-03
R語言數(shù)據(jù)結構之矩陣、數(shù)組與數(shù)據(jù)框詳解
進行數(shù)據(jù)分析的第一步是先拿到數(shù)據(jù),下面這篇文章主要給大家介紹了關于R語言數(shù)據(jù)結構之矩陣、數(shù)組與數(shù)據(jù)框的相關資料,文中通過實例代碼介紹的非常詳細,需要的朋友可以參考下2022-07-07
R語言繪圖數(shù)據(jù)可視化pie?chart餅圖
這篇文章主要介紹了R語言繪圖數(shù)據(jù)可視化pie?chart餅圖，教大家如何用R語言來畫大餅，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進步2022-02-02
這篇文章主要介紹了基于R語言賦值符號的區(qū)別說明，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
在本篇文章里小編給大家整理了一篇關于R語言關于卡方檢驗實例 內容，有興趣的朋友們可以學習參考下。2021-05-05
這篇文章主要介紹了R語言:排序的應用操作，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
這篇文章主要為大家介紹了R語言中Rcpp與Eigen庫之間的相互轉換的技巧操作，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進步2021-11-11
使用R中merge()函數(shù)合并數(shù)據(jù)的方法
這篇文章主要介紹了使用R中merge()函數(shù)合并數(shù)據(jù),本文詳細介紹R中merge()函數(shù)參數(shù)及合并數(shù)據(jù)類型，利用sql的表連接概念進行類比，簡單易懂，需要的朋友可以參考下2023-03-03