快捷導(dǎo)航

R語(yǔ)言繪圖樣式設(shè)置操作(符號(hào),線條,顏色,文本屬性)

更新時(shí)間：2021年03月13日 15:09:35 作者：zhyoulun

這篇文章主要介紹了R語(yǔ)言繪圖樣式設(shè)置操作(符號(hào),線條,顏色,文本屬性)，具有很好的參考價(jià)值，希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧

設(shè)置圖像樣式有兩種方法，一種是全局修改，一種只針對(duì)一幅圖片有效。

全局修改

a<-c(1:10)
 
#全局修改
old_par<-par(no.readonly=TRUE) #記錄默認(rèn)樣式到變量old_par中
par(lty=2,pch=17)    #設(shè)置線型lty=2虛線，pch=17實(shí)心三角形，鍵值對(duì)的方式進(jìn)行設(shè)置
 
#第一幅圖，已經(jīng)和默認(rèn)樣式不一樣了
b<-rnorm(10)
plot(a,b,type='b')
 
#第二幅圖，和第一幅圖樣式一樣
b<-rnorm(10)
plot(a,b,type='b')
 
par(old_par)     #應(yīng)用默認(rèn)樣式
 
#第三幅圖，默認(rèn)樣式
b<-rnorm(10)
plot(a,b,type='b')

針對(duì)一幅圖片有效

a<-c(1:10)
b<-rnorm(10)
plot(a,b,type='b',lty=2,pch=17)

如下列表為可以設(shè)置的鍵值對(duì)

參數(shù)	作用	描述	列表
pch	點(diǎn)的符號(hào)	指定繪制點(diǎn)時(shí)使用的符號(hào)
cex	符號(hào)的大小	指定符號(hào)的大小。cex是一個(gè)數(shù)值，表示繪圖符號(hào)相對(duì)于默認(rèn) 大小的縮放倍數(shù)。默認(rèn)大小為1，1.5表示放大為默認(rèn)值的1.5倍， 0.5表示縮小為默認(rèn)值的50%，等等
lty	線條類型
lwd	線條寬度	指定線條寬度。lwd是以默認(rèn)值的相對(duì)大小來(lái)表示的（默認(rèn)值為1）。例如，lwd=2將生成一條兩倍于默認(rèn)寬度的線條

col		默認(rèn)的繪圖顏色。某些函數(shù)（如lines和pie）可以接受一個(gè) 含有顏色值的向量并自動(dòng)循環(huán)使用。例如，如果設(shè)定col=c("red", "blue")并需要繪制三條線，則第一條線將為紅色，第二條線為藍(lán)色，第三條線又將為紅色
col.axis		坐標(biāo)軸刻度文字的顏色
col.lab		坐標(biāo)軸標(biāo)簽（名稱）的顏色
col.main		標(biāo)題顏色
col.sub		副標(biāo)題顏色
fg		圖形的前景色
bg		圖形的背景色

cex		表示相對(duì)于默認(rèn)大小縮放倍數(shù)的數(shù)值。默認(rèn)大小為1，1.5表示放大為默認(rèn)值的1.5倍，0.5表示縮小為默認(rèn)值的50%，等等
cex.axis		坐標(biāo)軸刻度文字的縮放倍數(shù)。類似于cex
cex.lab		坐標(biāo)軸標(biāo)簽（名稱）的縮放倍數(shù)。類似于cex
cex.main		標(biāo)題的縮放倍數(shù)。類似于cex
cex.sub		副標(biāo)題的縮放倍數(shù)。類似于cex

font		整數(shù)。用于指定繪圖使用的字體樣式。1=常規(guī)，2=粗體，3=斜體， 4=粗斜體，5=符號(hào)字體（以Adobe符號(hào)編碼表示）
font.axis		坐標(biāo)軸刻度文字的字體樣式
font.lab		坐標(biāo)軸標(biāo)簽（名稱）的字體樣式
font.main		標(biāo)題的字體樣式
font.sub		副標(biāo)題的字體樣式
ps		字體磅值（1磅約為1/72英寸）。文本的最終大小為 ps*cex
family		繪制文本時(shí)使用的字體族。標(biāo)準(zhǔn)的取值為serif（襯線）、sans（無(wú)襯線）和mono（等寬）

pin		以英寸表示的圖形尺寸（寬和高）
mai		以數(shù)值向量表示的邊界大小，順序?yàn)椤跋?、左、上、右”，單位為英?/td>
mar		以數(shù)值向量表示的邊界大小，順序?yàn)椤跋?、左、上、右”，單位為英?。默認(rèn)值為c(5, 4, 4, 2) + 0.1

標(biāo)題title

坐標(biāo)軸axis

參考線abline

圖例legend

文本標(biāo)注text（繪圖區(qū)域內(nèi)部添加文字），mtext（圖形四個(gè)邊界添加文字）

補(bǔ)充：R語(yǔ)言利用ggplot畫(huà)圖時(shí)調(diào)整坐標(biāo)軸字體大小

利用ggplot畫(huà)好圖，并把它插入到論文中后，你會(huì)發(fā)現(xiàn)默認(rèn)的字體大小12pt太小了，與LATEXLATEX中圖的caption大小不匹配，為此，你需要在利用ggplot畫(huà)圖的時(shí)候一開(kāi)始就要調(diào)整到你需要的大小。

我經(jīng)過(guò)摸索，發(fā)現(xiàn)將字體調(diào)整為14pt比較合適。

R的具體代碼如下所示：

library(ggplot2)
acs = read.csv("newJScs.csv",header=T)
pdf(file="fig13.pdf",family="GB1",pointsize=16)
p <- ggplot(acs,aes(x=factor(grade),y=salary)) + geom_boxplot()
p <- p + xlab("專業(yè)技術(shù)序列等級(jí)") + ylab("固定薪酬（元）") 
p + theme(axis.title.x =element_text(size=14), axis.title.y=element_text(size=14))
dev.off()

上面pdf(...)和dev.off()是為了將畫(huà)出來(lái)的圖形直接存到pdf矢量圖形中的，使畫(huà)出來(lái)的圖形是一個(gè)pdf文件，你在用LATEXLATEX的時(shí)候，可以直接加入pdf格式的圖形。

以上為個(gè)人經(jīng)驗(yàn)，希望能給大家一個(gè)參考，也希望大家多多支持腳本之家。如有錯(cuò)誤或未考慮完全的地方，望不吝賜教。

您可能感興趣的文章: