【原】R繪圖邊界如何控制

生信交流平臺(tái) 2021-12-29

展開全文

大家都知道R的畫圖功能非常強(qiáng)大，可是有的時(shí)候，按照默認(rèn)的圖形參數(shù)，畫出來的圖片會(huì)顯示不全。查看幫助文檔吧，一大堆英文看的腦袋發(fā)蒙，哎，他們怎么就不能安分守己地待在他們該在的區(qū)域呢？?。?img doc360img-src='http://image109.360doc.com/DownloadImg/2021/12/2910/236767870_2_20211229102009724' data-ratio="1" data-type="png" data-w="20" style="display: inline-block;vertical-align: text-bottom;box-sizing: border-box !important;overflow-wrap: break-word !important;width: 20px !important;visibility: visible !important;" src="http://image109.360doc.com/DownloadImg/2021/12/2910/236767870_2_20211229102009724">別急別急，下面小編就來說說，如何給各區(qū)域畫地為牢，讓他們安分守己的待在自己的區(qū)域，互不干擾。

事實(shí)上，R繪圖區(qū)域（如上圖），主要分為兩部分：

一是外圍邊距（out margin area）；

二是繪圖區(qū)域，繪圖區(qū)域又細(xì)分為兩個(gè)部分：繪圖邊距（margins）和主繪圖(main plot area)。

外圍邊距可使用par()函數(shù)中的oma來進(jìn)行設(shè)置。oma即out margin area，例如oma=c(5,4,3,2)，這里指外圍邊距分別為下邊距：5行，左邊距4行，上邊距3行，右邊距2行，這里的行是指可以顯示1行普通字體。注意，oma()設(shè)置順序是從bottom開始，按照bottom,left,top,right方向設(shè)置，也就是從bottom開始按照順時(shí)針方向設(shè)置。

繪圖邊距（margins）可以使用par()函數(shù)中mar來設(shè)置。比如mar=c(5,4,3,2)，與外圍邊距的設(shè)置類似，是指繪圖邊距分別為下邊距：5行，左邊距4行，上邊距3行，右邊距2行。參數(shù)設(shè)置順序與oma()順序一直，也是從bottom開始順時(shí)針方向設(shè)置。

R中邊距大小一般有兩個(gè)單位：“行”和“英寸”，上述兩個(gè)參數(shù)的單位都是行邊距，所以與之對(duì)應(yīng)的就有英寸邊距的參數(shù)。omi和oma，同樣可以設(shè)置外邊距，二者唯一的區(qū)別就是單位不同，omi單位是inch，而oma單位是行；同樣，mai與mar均可以設(shè)置繪圖邊距，mai單位是inch，而mar單位是行。具體使用哪個(gè)參數(shù)，根據(jù)大家的習(xí)慣而來，像小編就習(xí)慣使用mar()和oma()。

說了這么多，可能各位小主還是霧里看花，下面咱們用數(shù)據(jù)測試一下，就一目了然。

> attach(mtcars)#加載內(nèi)置數(shù)據(jù)集
> plot(wt,mpg,main="test")#畫散點(diǎn)圖
> box(which = "plot", col = "red", lwd = 2)#繪制主繪圖區(qū)域邊框
> box(which = "figure", col = "blue", lwd = 5)#繪制 out margin area區(qū)域邊框

上圖中，紅色方框內(nèi)的區(qū)域就是繪圖區(qū)域，紅色框和藍(lán)色框之間的區(qū)域就是mar()設(shè)置的繪圖邊距區(qū)域。一般來說，繪圖邊距區(qū)域用來顯示坐標(biāo)軸、坐標(biāo)軸標(biāo)簽及標(biāo)題。所以在設(shè)置時(shí)，一般是下邊距和左邊距都會(huì)大一些。如果多個(gè)x軸或者y軸，我們也可以考慮將上邊距或者右邊距放大一些。

通常畫圖的時(shí)候，坐標(biāo)軸顯示不全，一般就是因?yàn)?/span>margins區(qū)域過小。下面我們縮小margins區(qū)域的面積，看看是否會(huì)和我們預(yù)料的一樣。

> par(oma=c(1,1,1,1), mar=c(2,2,2,2))
> plot(wt,mpg,main="test1")
> box(which = "figure", col = "blue", lwd = 5)
> box(which = "plot", col = "red", lwd = 2)

我們可以看到margins區(qū)域縮小導(dǎo)致x和y軸的標(biāo)簽沒有顯示，和我們預(yù)料的一樣，所以下次出現(xiàn)坐標(biāo)軸標(biāo)簽顯示不全的情況時(shí)，我們就可以通過調(diào)節(jié)mar()來解決啦。

至此，有的小主可能會(huì)問，那out margin area指的是嘛呀？各位小主別著急呀，且聽我娓娓道來。所謂的out margin area指的就是外側(cè)邊框和圖形設(shè)備之間的區(qū)域，上面的幾張圖片大家可能看的不是特別清晰，下面這張圖片將將清晰的展示out margin area到底是什么。

> par(oma=c(3,3,3,3), mar=c(5,5,5,5))
> plot(wt,mpg,main="test3")
> box(which = "plot", col = "red", lwd = 2)
> box(which = "figure", col = "blue", lwd = 5)

上圖中的虛線方框和藍(lán)色方框之間的區(qū)域就是out margin area區(qū)域，由于小編是用Rstudio做的圖，所以上圖中的out margin area就是指與Rstudio圖形界面的邊距啦。