R語言作圖:坐標(biāo)軸的設(shè)置方式
要繪制一張賞心悅目的統(tǒng)計(jì)圖表，坐標(biāo)軸的設(shè)置至關(guān)重要。在R語言底層作圖中，對(duì)坐標(biāo)軸的調(diào)整主要通過調(diào)整plot函數(shù)、axis函數(shù)和title函數(shù)的一系列參數(shù)完成。
plot(x,y, ...) axis(side,at = NULL, labels = TRUE, tick = TRUE, line = NA, pos= NA, outer = FALSE, font = NA, lty = "solid", lwd = 1, lwd.ticks = lwd, col = NULL,col.ticks = NULL, hadj = NA, padj = NA, ...) title(main= NULL, sub = NULL, xlab = NULL, ylab = NULL, line = NA, outer = FALSE, ...)
一、plot函數(shù)的準(zhǔn)備
在個(gè)性化設(shè)置坐標(biāo)軸之前中，通常需調(diào)整plot函數(shù)中的ann、bty、xaxt、yaxt、xaxs和yaxs參數(shù)：
ann取FALSE時(shí)將不會(huì)畫出標(biāo)題（包括主、副標(biāo)題及坐標(biāo)軸標(biāo)題）；
bty用來設(shè)置邊框形式，默認(rèn)值為"o"，表示四面邊框都畫出，其余可選值包括"l"（左下）、"7"（上右）、"c"（上下左）、"u"（左下右）、"]" （上下右）和"n"（無，即不畫邊框），在很多個(gè)性化繪圖中，bty設(shè)為"n"，后期的邊框線再使用其他函數(shù)（如axis）自行添加；
xaxs和yaxs 用來設(shè)置x軸和y軸的范圍，默認(rèn)值取“r”，表示坐標(biāo)軸比給定作圖范圍（參數(shù)xlim和ylim給出的范圍）稍微大一點(diǎn)兒，取”i”時(shí)表示坐標(biāo)軸范圍與給定作圖范圍完全相同，另外還可取”s”、”e”、”d”；
xaxt和yaxt 取”n”時(shí)，坐標(biāo)軸、刻度線以及刻度值將不會(huì)畫出。
x <- seq(-4, 4, 0.01) y <- x^2 par(mfrow = c(2, 2), mar = c(4, 4, 1, 1)) plot(x, y) # 未作處理 plot(x, y, xaxs = "i", yaxs ="i") # 繪圖邊框未留白 plot(x, y, bty = 'l') # 只保留左和下兩條邊框 plot(x, y, ann = F, bty = "n", xaxt = "n", yaxt ="n") # 邊框、坐標(biāo)軸都去掉
二、axis函數(shù)的用法
1、基本操作
side表示要操作的坐標(biāo)軸，取值1、2、3、4分別代表下、左、上、右；
at表示刻度線及刻度值所在位置；
labels表示刻度值；
las表示坐標(biāo)刻度值文字方向，las=0表示文字方向與坐標(biāo)軸平行，1表示始終為水平方向，2表示與坐標(biāo)軸垂直，3表示終為垂直方向。
x<- seq(-4, 4, 0.01) y<- x^2 par(mfrow=c(1, 2), mar = c(4, 4, 1, 1)) #未設(shè)置文字方向 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4) axis(2,seq(0, 16, 4), seq(0, 16, 4)) #文字方向水平 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, las = 1) axis(2,seq(0, 16, 4), seq(0, 16, 4), las = 1)
2、字體字號(hào)
cex.axis表示坐標(biāo)軸刻度值的字號(hào)大小，
font.axis表示坐標(biāo)軸刻度值的字體，font=1表示正體，2表示黑體，3表示斜體，4表示黑斜體。
x<- seq(-4, 4, 0.01) y<- x^2 par(mfrow=c(2, 2), mar = c(4, 4, 1, 1)) #未設(shè)置字體字號(hào) plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4) #cex.axis = 2 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, cex.axis = 2) #font.axis = 2 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, font.axis = 2) #font.axis = 3 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, font.axis = 3)
3、顏色
col表示圖的顏色，用在axis函數(shù)中表示坐標(biāo)軸線和坐標(biāo)刻度線的顏色；
col.axis表示坐標(biāo)軸刻度值的顏色；
col.ticks表示坐標(biāo)軸刻度線的顏色。
x<- seq(-4, 4, 0.01) y<- x^2 par(mfrow=c(2, 2), mar = c(4, 4, 1, 1)) #未設(shè)置顏色 plot(x,y, ann = F, bty = "n", xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4) #col = 2 plot(x,y, ann = F, bty = "n", xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, col = 2) #col.axis = 2 plot(x,y, ann = F, bty = "n", xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, col.axis = 2) #col.ticks = 2 plot(x,y, ann = F, bty = "n", xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, col.ticks = 2)
4、位置
line表示坐標(biāo)軸線位置與圖像邊框的距離，取負(fù)數(shù)時(shí)會(huì)畫在圖像邊框以內(nèi)；
mgp默認(rèn)值為c(3, 1, 0)，三個(gè)數(shù)字分別代表坐標(biāo)軸標(biāo)題、刻度值和軸線與繪圖邊框的距離；
tcl默認(rèn)值為-0.5，數(shù)值表示刻度線長度，負(fù)值表示刻度線朝外，正值朝里；
pos 表示軸線所在的位置；
line.outer取TRUE時(shí)，坐標(biāo)軸將畫在畫布邊緣處；
hadj指將刻度值沿平行坐標(biāo)軸方向調(diào)整的距離；
padj指將刻度值沿垂直坐標(biāo)軸方向調(diào)整的距離。
x <- seq(-4, 4, 0.01) y <- x^2 par(mfrow= c(2, 2), mar = c(4, 4, 1, 1)) # 未設(shè)置刻度值位置 plot(x, y, ann = F, xaxt = "n", yaxt ="n") axis(1, -4:4, -4:4) # 使用line調(diào)整刻度值位置 plot(x, y, ann = F, xaxt = "n", yaxt ="n") axis(1, -4:4, -4:4, line = 2) # 使用mgp調(diào)整刻度值位置 plot(x, y, ann = F, xaxt = "n", yaxt ="n") axis(1, -4:4, -4:4, mgp = c(3, 2, 0)) # 使用padj調(diào)整刻度值位置 plot(x, y, ann = F, xaxt = "n", yaxt ="n") axis(1, -4:4, -4:4, padj = 1)
5、其他
tick取FALSE時(shí)，坐標(biāo)軸線和刻度線不畫出；
lty表示線型，用在axis函數(shù)中表示坐標(biāo)軸線型；
lwd表示線的粗細(xì)，用在axis函數(shù)中表示坐標(biāo)軸線粗細(xì)；
lwd.ticks表示刻度線粗細(xì)。
三、title函數(shù)的用法
main、sub、xlab和ylab分別表示主標(biāo)題、副標(biāo)題、x軸標(biāo)題和y軸標(biāo)題；
cex.lab表示坐標(biāo)軸標(biāo)題的字號(hào)大??；
font.lab表示坐標(biāo)軸標(biāo)題的字體；
col.lab表示坐標(biāo)軸標(biāo)題的顏色；
其余參數(shù)和axis中用法一致。
x<- seq(-4, 4, 0.01) y<- x^2 par(mfrow=c(2, 2), mar = c(4, 4, 1, 1)) #無標(biāo)題 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4) axis(2,seq(0, 16, 4), seq(0, 16, 4)) #使用title設(shè)置標(biāo)題 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, las = 1) axis(2,seq(0, 16, 4), seq(0, 16, 4), las = 1) title(xlab= 'x', ylab = 'y') #使用line調(diào)整位置 plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, las = 1) axis(2,seq(0, 16, 4), seq(0, 16, 4), las = 1) title(xlab= 'x', ylab = 'y', line = 2) #調(diào)整顏色字體字號(hào) plot(x,y, ann = F, xaxt = "n", yaxt = "n") axis(1,-4:4, -4:4, las = 1) axis(2,seq(0, 16, 4), seq(0, 16, 4), las = 1) title(xlab= 'x', ylab = 'y', col.lab = 2, font.lab = 4, cex.lab = 2)
四、刻度間隔
plot函數(shù)會(huì)自動(dòng)給出比較合理的刻度間隔，本質(zhì)上是調(diào)用了pretty函數(shù)。
pretty(x, n = 5, min.n = n %/% 3, shrink.sml = 0.75, high.u.bias = 1.5, u5.bias = .5 + 1.5*high.u.bias, eps.correct = 0, ...)
x是一個(gè)序列，pretty函數(shù)會(huì)先對(duì)x取一個(gè)range，然后等分為大約n+1個(gè)間隔。
如果在作圖時(shí)對(duì)系統(tǒng)自動(dòng)給出的間隔不滿意，可以調(diào)整n的值，用pretty函數(shù)自定義合適的間隔。
以上為個(gè)人經(jīng)驗(yàn)，希望能給大家一個(gè)參考，也希望大家多多支持腳本之家。如有錯(cuò)誤或未考慮完全的地方，望不吝賜教。
相關(guān)文章
在本篇文章里小編給大家整理的是一篇關(guān)于R語言操作XML文件實(shí)例分析，有興趣的朋友們可以跟著學(xué)習(xí)下。2021-05-05
本文主要介紹了R語言與多元線性回歸分析計(jì)算案例，文中通過示例代碼介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們可以參考一下2021-08-08
R語言數(shù)據(jù)類型知識(shí)點(diǎn)總結(jié)
在本篇文章里小編給大家整理的是一篇關(guān)于R語言數(shù)據(jù)類型知識(shí)點(diǎn)總結(jié)內(nèi)容，有興趣的朋友們可以學(xué)習(xí)下。2021-03-03
R語言實(shí)現(xiàn)地理加權(quán)回歸（GWR）
這篇文章主要為大家介紹了R語言實(shí)現(xiàn)地理加權(quán)回歸（GWR）操作流程示例詳解,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步,早日升職加薪2023-10-10
這篇文章主要介紹了R語言基本畫圖函數(shù)與多圖多線的用法，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過來看看吧2021-03-03
R語言如何將大型Excel文件轉(zhuǎn)為dta格式詳解
這篇文章主要給大家介紹了關(guān)于R語言如何將大型Excel文件轉(zhuǎn)為dta格式的相關(guān)資料，文中通過示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2021-03-03
R語言數(shù)可視化Split?violin?plot小提琴圖繪制方法
這篇文章主要為大家介紹了R語言數(shù)可視化Split?violin?plot小提琴圖繪制方法，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步2022-02-02
apply()函數(shù)是一種很強(qiáng)大的機(jī)制,下面這篇文章主要給大家介紹了關(guān)于R語言apply系列函數(shù)的相關(guān)資料,文中通過實(shí)例代碼介紹的非常詳細(xì),需要的朋友可以參考下2022-12-12
批量地做就是解放雙手地過程，本文主要介紹了R語言批量讀取某路徑下文件內(nèi)容的方法，文中通過示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2022-04-04
這篇文章主要介紹了R語言作圖之density plot(密度圖)的制作步驟,本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2021-03-03