R語言繪圖布局實例講解

更新時間：2021年03月17日 10:55:13 作者：廬州月光

這篇文章主要介紹了R語言繪圖布局實例講解，文中實例講解的很清晰，有感興趣的同學(xué)可以研究下

在R語言中，par 函數(shù)可以設(shè)置圖形邊距，其中oma 參數(shù)設(shè)置outer margin, mar 參數(shù)設(shè)置margin,

這些邊距有什么不同呢，通過box函數(shù)可以直觀的看到

box 默認(rèn)在當(dāng)前圖形繪制邊框，第一個參數(shù)which = "plot", 所以在當(dāng)前圖形上繪制邊框

which 的值除了plot 之外，還可以選擇 figure, inner, outer

接下來分別用不同的值測試一下，為了區(qū)分，為不同的邊框設(shè)置不同的顏色和類型,代碼如下：

attach(mtcars)
plot(wt, mpg)
abline(lm(mpg~wt))
title("Regression of MPG on Weight")
box(which = "plot", col = "red", lwd = 2)
box(which = "figure",col = "blue", lwd = 4)

為了區(qū)分，plot的邊框為紅色， figure 的邊框為藍(lán)色，效果如下：

可以看出，在figure 區(qū)域中包含了plot 區(qū)域， plot 區(qū)域指的是實際繪圖中的坐標(biāo)系內(nèi)的區(qū)域，里面是坐標(biāo)系中的點，線等元素，而在figure 和 plot 區(qū)域之間的是坐標(biāo)軸的刻度，x軸和y中的標(biāo)簽，title 等元素

在紅色的邊框和藍(lán)色的邊框之間的區(qū)域就是inner margin, 如果inner margin 太窄會發(fā)生什么，用一個實際的例子看一下

par(oma=c(1,1,1,1), mar=c(2,2,2,2))
attach(mtcars)
plot(wt, mpg)
abline(lm(mpg~wt))
title("Regression of MPG on Weight")
box(which = "plot", col = "red",  lwd = 2)
box(which = "figure",col = "blue",  lwd = 4)

效果如下：

可以看到，坐標(biāo)軸對應(yīng)的標(biāo)題沒有了，通過mar 參數(shù)設(shè)置了inner margin 的寬度，由于都是1，太窄了，所以坐標(biāo)軸的標(biāo)題沒顯示出來，下次遇到類似的問題，就知道因該將inner margin 設(shè)置的大一些

mar 參數(shù)的值是一個長度為4的向量，分別對應(yīng)下，左，上，右 4個方向的inner margin, 只需要記住第一個對應(yīng)的是下，然后沿逆時針方向設(shè)置就可以了；

解決了inner margin 的問題，那么outer margin 有是怎么一回事呢？

在figuer 區(qū)域和我們整個繪圖設(shè)備之間，其實還有一個邊距，這個邊距就是outer margin, 只不過默認(rèn)值都是0，所以看不到

接下來我們用oma 參數(shù)設(shè)置outer margin 的值，將其設(shè)置的寬一點，然后再用box 標(biāo)記出outer 邊框和figure 邊框，直觀的看一下，代碼如下：

par(oma=c(2,2,2,2))
attach(mtcars)
plot(wt, mpg)
abline(lm(mpg~wt))
title("Regression of MPG on Weight")
box(which = "plot", col = "red",  lwd = 2)
box(which = "figure",col = "blue",  lwd = 4)
box(which = "outer", col = "black", lty = 8)