R語(yǔ)言數(shù)據(jù)分析與挖掘-R語(yǔ)言的重要繪圖函數(shù)

圖形三要素01102低級(jí)繪圖函數(shù)03高級(jí)繪圖函數(shù)01PAGE2base包繪圖技術(shù)R語(yǔ)言base包的繪圖函數(shù)可以分為高級(jí)繪圖函數(shù)與低級(jí)繪圖函數(shù)兩大類。高級(jí)繪圖函數(shù)的主要特性如下：創(chuàng)建新圖形的命令，運(yùn)行代碼會(huì)在新窗口中創(chuàng)建一個(gè)圖形。如果add=TRUE（默認(rèn)為FALSE），則在當(dāng)前活動(dòng)窗口中將新建圖形疊加至原有圖形中。在基礎(chǔ)包中，常用的高級(jí)函數(shù)有：plot（散點(diǎn)圖/曲線圖）、barplot（柱形圖/條形圖）、hist（直方圖）、pie（餅圖）等。低級(jí)繪圖函數(shù)的主要特性如下：運(yùn)行代碼后會(huì)在現(xiàn)有活動(dòng)窗口中添加點(diǎn)（points）、線（lines/abline/segments/arrows）、文字（text）等圖形繪圖元素。添加圖例（legend）、坐標(biāo)軸標(biāo)題（title）的正標(biāo)題或副標(biāo)題等提示說(shuō)明繪圖元素。因?yàn)榈图?jí)函數(shù)必須存在于高級(jí)繪圖函數(shù)中，所以在使用低級(jí)繪圖函數(shù)前，要先使用高級(jí)繪圖函數(shù)創(chuàng)建一個(gè)圖形。2圖形三要素301PAGE4顏色元素R語(yǔ)言可以通過(guò)設(shè)置繪圖參數(shù)col，改變圖像、坐標(biāo)軸、文字、點(diǎn)、線等的顏色。除了利用參數(shù)col控制繪圖顏色外，也可以通過(guò)其他參數(shù)來(lái)設(shè)置圖形的前景色、背景色、標(biāo)題顏色、坐標(biāo)軸顏色等。4參數(shù)描述col默認(rèn)的繪圖顏色fg圖形的前景色bg圖形的背景色col.axis坐標(biāo)軸刻度文字的顏色col.lab坐標(biāo)軸標(biāo)簽的顏色col.main主標(biāo)題的顏色col.sub副標(biāo)題的顏色>plot(women,main="身高VS體重散點(diǎn)圖",sub="數(shù)據(jù)來(lái)源：women數(shù)據(jù)集",+col="red",col.main="green",col.sub="blue",+col.axis="grey",col.lab="yellow")PAGE5主題顏色方案除了固定顏色選擇外，R語(yǔ)言本身也提供特定顏色主題的配色方案。這些配色方案用一系列漸變的顏色表現(xiàn)特定的主題。如rainbow()、heat.colors()、terrain,colors()、topo.colors()、cm.colors()、gray()等函數(shù)。5主題函數(shù)描述rainbow()彩虹的顏色，是由“赤、橙、黃、綠、青、藍(lán)、紫”一系列顏色組成heat.colors()從紅色漸變到黃色，再變到白色terrain.colors()從綠色漸變到黃色，再到棕色，最后到白色topo.colors()從藍(lán)色漸變到青色，再到黃色，最后到棕色cm.colors()從青色漸變到白色，再到粉紅色gray()從黑到白的漸變過(guò)程，參數(shù)值范圍在[0,1]>#主題顏色>par(mfrow=c(3,2))>barplot(rep(1,7),col=rainbow(7),main="barplot(rep(1,7),col=rainbow(7))",axes=F)>barplot(rep(1,7),col=heat.colors(7),main="barplot(rep(1,7),col=heat.colors(7))",axes=F)>barplot(rep(1,7),col=terrain.colors(7),main="barplot(rep(1,7),col=terrain.colors(7))",axes=F)>barplot(rep(1,7),col=topo.colors(7),main="barplot(rep(1,7),col=topo.colors(7))",axes=F)>barplot(rep(1,7),col=cm.colors(7),main="barplot(rep(1,7),col=cm.colors(7))",axes=F)>barplot(rep(1,7),col=gray(0:6/6),main="barplot(rep(1,7),col=gray(0:6/6))",axes=F)>par(mfrow=c(1,1))PAGE6RColorBrewer擴(kuò)展包RColorBrewer擴(kuò)展包提供了3套很好的配色方案。用戶只需要指定配色方案的名稱，就可以使用brewer.pal()函數(shù)生成顏色。這3套配色方案包括：連續(xù)型Sequential：生成一系列連續(xù)漸變的顏色，通常用來(lái)標(biāo)記連續(xù)型數(shù)值的大小。極端型Diverging：生成用深色強(qiáng)調(diào)兩端、淺色標(biāo)示中部的系列顏色、可用來(lái)標(biāo)記數(shù)據(jù)中的離群點(diǎn)。離散型Qualitative：生成一系列彼此差異比較明顯的顏色，通常用來(lái)標(biāo)記離散型數(shù)據(jù)。運(yùn)行display.brewer.all()函數(shù)可顯示不同調(diào)色板，當(dāng)參數(shù)type為seq時(shí)顯示連續(xù)型、div時(shí)顯示極端型、qual時(shí)顯示離散型、all時(shí)同時(shí)顯示這3套配色方案。6>if(!require(RColorBrewer))install.packages("RColorBrewer")>par(mfrow=c(3,1))>display.brewer.all(type="seq")>title('seq連續(xù)型：共18組顏色，每組分為9個(gè)漸變顏色展示')>display.brewer.all(type="div")>title("div極端型：共9組顏色，每組為11個(gè)漸變顏色展示")>display.brewer.all(type="qual")>title("qual離散型：共8組顏色，每組漸變顏色數(shù)不盡相同")>par(mfrow=c(1,1))PAGE7文字元素文字元素可以設(shè)置的參數(shù)一般包括：字體（font）、顏色（col）、大?。╟ex）。顏色在上一小節(jié)已經(jīng)介紹過(guò)，這里重點(diǎn)講解如何設(shè)置文字的字體和大小。可以通過(guò)參數(shù)font來(lái)設(shè)置字體。font取值是一個(gè)整數(shù)，分別用1、2、3、4來(lái)表示正常體、粗體、斜體和粗斜體?？梢酝ㄟ^(guò)參數(shù)cex來(lái)設(shè)置文字的大小。cex取值是一個(gè)實(shí)數(shù)，默認(rèn)為1，表示不縮放。取值小于1時(shí)，表示縮小，取值大于1時(shí)，表示放大。7#字體和大小plot(0:4,type="n",axes=F,xlab=NA,ylab=NA)type<-c("正常字體(默認(rèn))","粗體字體","斜體字體","粗斜體字體")for(iin1:4){text(2,5-i,font=i,cex=i/2,labels=paste0("font=",i,":",type[i],";cex=",i/2,"放大",i/2,"倍"))}PAGE8點(diǎn)線元素-點(diǎn)點(diǎn)元素可以設(shè)置的參數(shù)一般包括：點(diǎn)樣式（pch）、顏色（col）、大?。╟ex）等。顏色和大小前文已經(jīng)介紹，接下來(lái)一起來(lái)學(xué)習(xí)點(diǎn)樣式pch。參數(shù)pch（點(diǎn)樣式）可取0~25的數(shù)字，當(dāng)取值為21~25時(shí),還可以指定邊界顏色(col)和填充色(bg)。此外，參數(shù)pch也可以是雙引號(hào)里的單個(gè)字符。例如pch取值可以為“*，？，a，A，0，.，+，-，|”。8>#點(diǎn)元素>plot(1,col="white",xlim=c(1,7),ylim=c(1,5),+main="點(diǎn)樣式cex=2,pch=",xlab=NA,ylab=NA,axes=FALSE)>for(iinc(0:25)){+x<-(i%/%5)*1+1+y<-6-(i%%5)-1+if(length(which(c(21:25)==i)>=1)){+points(x,y,pch=i,col="blue",bg="yellow",cex=2)+}else{+points(x,y,pch=i,cex=2)+}+text(x+0.2,y,labels=i,font=2)+}>#pch取值可以為"*，？，a，A，0，.，+，-，|">points(6,4,pch="*",cex=2);text(6+0.2,4,labels="\"*\"",font=2)>points(6,3,pch="?",cex=2);text(6+0.2,3,labels="\"?\"",font=2)>points(6,2,pch="a",cex=2);text(6+0.2,2,labels="\"a\"",font=2)>points(6,1,pch="A",cex=2);text(6+0.2,1,labels="\"A\"",font=2)>points(7,5,pch="0",cex=2);text(7+0.2,5,labels="\"0\"",font=2)>points(7,4,pch=".",cex=2);text(7+0.2,4,labels="\".\"",font=2)>points(7,3,pch="+",cex=2);text(7+0.2,3,labels="\"+\"",font=2)>points(7,2,pch="-",cex=2);text(7+0.2,2,labels="\"-\"",font=2)>points(7,1,pch="|",cex=2);text(7+0.2,1,labels="\"|\"",font=2)PAGE9點(diǎn)線元素-線線元素可以設(shè)置的參數(shù)一般包括：線條樣式（lty）、顏色（col）、粗細(xì)（lwd）等。其中線的粗細(xì)參數(shù)lwd與文本和點(diǎn)的大小cex相似，參數(shù)lwd（寬度）默認(rèn)為1，表示不縮放。取小于1時(shí)，表示縮小，取大于1時(shí)，表示放大。線條樣式（lty）主要指實(shí)線、虛線、點(diǎn)線、點(diǎn)劃線等樣式。參數(shù)lty的不同數(shù)值對(duì)應(yīng)不同線條樣式。9數(shù)值說(shuō)明0不畫線1實(shí)線2虛線3點(diǎn)線4點(diǎn)虛線5長(zhǎng)虛線6雙虛線>#線元素>plot(x=1:10,y=rep(1,10),type="l",lty=0,lwd=0,ylim=c(1,8),xlim=c(-1,10),+axes=F,xlab=NA,ylab=NA)>text(0,1,labels="lty=0;lwd=0")>for(iin2:7){+lines(x=1:10,y=rep(i,10),lty=i-1,lwd=i/2,xlab=NA,ylab=NA)+text(0,i,labels=paste0("lty=",i-1,";lwd=",i/2))+}低級(jí)繪圖函數(shù)1002PAGE11標(biāo)題許多高級(jí)函數(shù)（例如plot、barplot、boxplot、qqnorm）允許在繪圖時(shí)設(shè)置坐標(biāo)軸和文本。以下代碼在圖形上添加了主標(biāo)題（main）、副標(biāo)題（sub）、坐標(biāo)軸標(biāo)簽（xlab、ylab）?？梢允褂玫图?jí)繪圖函數(shù)title()為圖形添加標(biāo)題和坐標(biāo)軸標(biāo)簽。其基本表達(dá)形式為：title(main=NULL,sub=NULL,xlab=NULL,ylab=NULL,line=NA,outer=FALSE,...)11參數(shù)說(shuō)明main設(shè)置主標(biāo)題內(nèi)容和文字屬性sub設(shè)置副標(biāo)題內(nèi)容和文字屬性xlab設(shè)置X軸標(biāo)題內(nèi)容和文字屬性ylab設(shè)置Y軸標(biāo)題內(nèi)容和文字屬性line設(shè)置line的值可以將標(biāo)簽移到圖外面outer設(shè)置outer=TRUE可以將標(biāo)簽放在外部邊距中>boxplot(Sepal.Length~Species,col=heat.colors(3),+main=list("Sepal.Length按照Species分類的箱線圖",+font=4,col="red",cex=1.5),+sub=list("數(shù)據(jù)來(lái)源：iris數(shù)據(jù)集",font=3,+col="green",cex=0.8),+xlab="Species",ylab="Sepal.Length")>#title函數(shù)>boxplot(Sepal.Length~Species,col=heat.colors(3))>title(main=list("Sepal.Length按照Species分類的箱線圖",+font=4,col="red",cex=1.5),+sub=list("數(shù)據(jù)來(lái)源：iris數(shù)據(jù)集",font=3,+col="green",cex=0.8),+xlab="Species",ylab="Sepal.Length")>boxplot(Sepal.Length~Species,col=heat.colors(3))>title(main="Sepal.Length按照Species分類的箱線圖",+font.main=4,col.main="red",cex.main=1.5,+sub="數(shù)據(jù)來(lái)源：iris數(shù)據(jù)集",font.sub=3,+col.sub="green",cex.sub=0.8,+xlab="Species",ylab="Sepal.Length")PAGE12坐標(biāo)軸在高級(jí)繪圖函數(shù)中一般都有用于設(shè)置坐標(biāo)軸展示和范圍的參數(shù)axes、xlim和ylim。其中axes是邏輯參數(shù)，如果axes為TRUE（默認(rèn)），則顯示X軸和Y軸，如果axes為FALSE，則隱藏X軸和Y軸；參數(shù)xaxt為"n"或yaxt為"n"則將分別隱藏X軸或Y軸；參數(shù)xlim、ylim是設(shè)置X軸、Y軸范圍。低級(jí)繪圖函數(shù)axis()可以在圖形上、下、左、右4個(gè)邊上設(shè)置坐標(biāo)軸，并設(shè)置坐標(biāo)軸的范圍/刻度標(biāo)記等。其基本表達(dá)形式為：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,...)12>#加載iris數(shù)據(jù)到內(nèi)存>attach(iris)>#繪制箱線圖>boxplot(Sepal.Length~Species,col=heat.colors(3),+axes=FALSE,xlab="Species",ylab="Sepal.Length")>#設(shè)置X軸樣式>axis(side=1,at=1:3,labels=unique(Species),col.axis="red",tick=FALSE)>#設(shè)置Y軸樣式>axis(side=2,col.ticks="gold",font=3,col="blue")PAGE13圖例當(dāng)圖形中包含的數(shù)據(jù)不止一組時(shí)，通常會(huì)使用不同的顏色進(jìn)行區(qū)分，并且使用圖例說(shuō)明不同顏色代表的組別。圖例中即包含文字、也包含點(diǎn)和線元素。可以利用legend()函數(shù)來(lái)對(duì)圖例參數(shù)進(jìn)行設(shè)置。13參數(shù)說(shuō)明x和y圖例的坐標(biāo)位置，除了使用參數(shù)x和y外，也可以使用"bottomright","bottom","bottomleft","left","topleft","top","topright","right"和"center"等表示位置的英文單詞legend一個(gè)字符向量，表示圖例中的文字fill字符向量，設(shè)置每個(gè)圖例標(biāo)簽的顏色。col圖例中點(diǎn)/線的顏色lty圖例中線條的類型lwd圖例中線條的寬度pch向量，圖例中的點(diǎn)符號(hào)bty圖例邊框的類型bg圖例邊框的背景色horiz圖例的擺放方式，為FALSE（默認(rèn)）時(shí)，圖例垂直排列，為TRUE時(shí)，圖例水平排列title設(shè)定圖例的標(biāo)題ncol設(shè)置圖例的列數(shù)adj圖例文字的對(duì)齊方式>#繪制分組柱狀圖>barplot(VADeaths,beside=TRUE,col=cm.colors(5))>#添加圖例>legend("top",legend=rownames(VADeaths),+ncol=5,fill=cm.colors(5),bty="n")PAGE14網(wǎng)格線使用grid()函數(shù)可以在圖形中添加網(wǎng)格線，其參數(shù)主要包括：ny用于設(shè)置水平網(wǎng)格的數(shù)目，nx用于設(shè)置垂直網(wǎng)格的數(shù)據(jù)，設(shè)置為NA時(shí)，表示不繪制相應(yīng)的網(wǎng)格線。參數(shù)lwd、lty和col分別設(shè)置網(wǎng)格線的寬度、樣式和顏色。14>op<-par(mfcol=1:2)>barplot(VADeaths,beside=TRUE,col=cm.colors(5),+main="plotVADeathswithgrid()")>grid()>barplot(VADeaths,beside=TRUE,col=cm.colors(5),+main="plotVADeathswithgrid(NA,7,lty=2,lwd=1.5,col='green')")>grid(NA,7,lty=2,lwd=1.5,col="green")>par(op)PAGE15點(diǎn)通過(guò)低級(jí)繪圖函數(shù)points()可以在圖上繪制點(diǎn)，其基本表達(dá)形式為：

points(x,y=NULL,type="p",...)使用這個(gè)函數(shù)可以很方便地在已有的圖形上加點(diǎn)。參數(shù)x是橫坐標(biāo)位置，參數(shù)y是縱坐標(biāo)位置，可以設(shè)置向量來(lái)代表多個(gè)點(diǎn)的位置；參數(shù)type有9種取值，分別代表不同的樣式："p"表示畫點(diǎn)(默認(rèn))，"l"表示畫線，"b"表示同時(shí)畫點(diǎn)和線，但點(diǎn)線不相交，"c"表示將type="b"中的點(diǎn)去掉，只剩下相應(yīng)的線條部分，"o"表示同時(shí)畫點(diǎn)和線，且相互重疊(這是與type="b"的區(qū)別)，"h"表示畫鉛垂線，"s"表示畫階梯線，從一點(diǎn)到下一點(diǎn)時(shí)，先畫水平線，再畫垂直線，"S"也是畫階梯線，但從一點(diǎn)到下一點(diǎn)是先畫垂直線，再畫水平線，"n"表示做一幅空?qǐng)D。大部分plot()函數(shù)的參數(shù)都適用于points。最常用的參數(shù)是col(設(shè)置點(diǎn)的顏色)、bg(設(shè)置點(diǎn)的背景色)、pch(設(shè)置所繪制點(diǎn)的符號(hào))、cex(設(shè)置點(diǎn)的大小)和lwd(設(shè)置符號(hào)邊框線條的寬度)。15>set.seed(1234)>data<-c(rnorm(100,mean=0,sd=1),rnorm(3,mean=4,sd=1))>boxplot(data,col="violet",ylim=c(-4,5),outline=F)>points(rep(1,3),data[101:103],pch=21,bg="yellow",cex=1.2)PAGE16文字可以使用text()函數(shù)在圖形基礎(chǔ)上添加文字。其基本表達(dá)形式為：text(x,y=NULL,labels=seq_along(x),adj=NULL,pos=NULL,offset=0.5,vfont=NULL,

cex=1,col=NULL,font=NULL,...)16參數(shù)說(shuō)明x,y設(shè)置文字的位置坐標(biāo)labels字符向量，設(shè)置放到圖形中的文字adj數(shù)值向量，有一個(gè)或兩個(gè)值（介于0到1之間）。如果設(shè)置的是一個(gè)值，表示橫向?qū)R。如果設(shè)置了兩個(gè)值，第一個(gè)表示橫向?qū)R，第二個(gè)表示縱向?qū)Rpos數(shù)值，設(shè)置文字的位置。pos=1表示下方，pos=2表示左側(cè)，pos=3表示上方，pos=4表示右側(cè)offset數(shù)值，設(shè)置標(biāo)簽的偏移量，單位是字符寬度（只有使用了pos時(shí)才生效）vfont兩個(gè)元素的字符向量，設(shè)置標(biāo)簽的字體。cex設(shè)置文字的大小col設(shè)置文字的顏色font設(shè)置文字的字體>#pos=4表示在右側(cè)>text(rep(1,3),data[101:103],pos=4,label=paste0("異常值",data[101:103]))PAGE17線：lines()函數(shù)繪制曲線lines()函數(shù)可以在已有圖形中添加曲線，其基本表達(dá)形式為lines(x,y=NULL,type="l",...)。plot()函數(shù)的很多參數(shù)也可用于lines()函數(shù)，較常用的參數(shù)包括lty（線條類型）、lwd（線條寬度）、col（線條顏色）等。由于繪制散點(diǎn)圖的高級(jí)繪圖函數(shù)plot()沒(méi)有參數(shù)add，即在同一繪圖窗口中不能使用兩個(gè)plot()函數(shù)，此時(shí)可以使用lines()函數(shù)實(shí)現(xiàn)。17>data(economics,package="ggplot2")>attach(economics)#將economics加載到內(nèi)存>plot(date,psavert,type="l",ylab="",ylim=c(0,26))#繪制psavert隨時(shí)間變化的時(shí)序圖>lines(date,uempmed,type="l",col="blue")#繪制uempmed曲線，并設(shè)置為藍(lán)色>detach(economics)#將economics從內(nèi)存中移除PAGE18線：abline()函數(shù)繪制直線使用abline()函數(shù)可以在已有圖形中添加直線。abline()函數(shù)的基本表達(dá)形式是：

abline(a=NULL,b=NULL,h=NULL,v=NULL,reg=NULL,coef=NULL,untf=FALSE,...)18參數(shù)說(shuō)明a直線截距b直線的斜率h畫水平線時(shí)的縱軸值v畫垂直線時(shí)的橫軸值reg設(shè)置一個(gè)帶coef方法的對(duì)象coef用函數(shù)coef提取系數(shù)（包含斜率和截距）的R對(duì)象>attach(iris)>#繪制一幅簡(jiǎn)單的散點(diǎn)圖>plot(Petal.Length~Petal.Width)>#繪制Petal.Length變量均值的水平線>abline(h=mean(Petal.Length),col="gray60")>#繪制Petal.Width變量均值的豎直線>abline(v=mean(Petal.Width),col="gray60")>#繪制擬合直線>abline(lm(Petal.Length~Petal.Width),+col="red",lwd=2,lty=3)>detach(iris)高級(jí)繪圖函數(shù)1903PAGE20高級(jí)繪圖函數(shù)R語(yǔ)言提供了繪制常見(jiàn)圖形的工具，包括散點(diǎn)圖、氣泡圖、柱狀圖、餅圖、線圖，同時(shí)也提供了一些專業(yè)的統(tǒng)計(jì)圖形，如莖葉圖、Q-Q圖等。表6-9列出了基礎(chǔ)包中常繪制的一些圖形。20高級(jí)繪圖函數(shù)描述plot(x)以x的元素值為縱坐標(biāo)、以序號(hào)為橫坐標(biāo)繪圖plot(x,y)x(在X軸上)與y(在Y軸上)的二元作圖sunflowerplot(x,y)同上，但是以相似坐標(biāo)的點(diǎn)作為花朵，其花瓣數(shù)目為點(diǎn)的個(gè)數(shù)pie(x)餅圖boxplot(x)盒形圖(又稱箱線圖、箱形圖)dotchart(x)如果x是數(shù)據(jù)框，作Cleveland點(diǎn)圖（逐行逐列累加圖）mosaicplot(x)列聯(lián)表的對(duì)數(shù)線性回歸殘差的馬賽克圖pairs(x)散點(diǎn)圖矩陣hist(x)直方圖barplot(x)條形圖qqnorm(x)正態(tài)分位數(shù)－分位數(shù)圖qqplot(x,y)y對(duì)x的分位數(shù)－分位數(shù)圖contour(x,y,z)等高線圖image(x,y,z)同上，但是實(shí)際數(shù)據(jù)大小用不同色彩表示stars(x)星狀圖symbols(x,y,...)在由x和y給定坐標(biāo)畫符號(hào)（圓，正方形，長(zhǎng)方形，星，溫度計(jì)式或者盒形圖），符號(hào)的類型、大小、顏色等由另外的變量指定heatmap(x)熱度圖smoothScatter(x)高密度散點(diǎn)圖stem(x)莖葉圖PAGE21散點(diǎn)圖R語(yǔ)言中創(chuàng)建散點(diǎn)圖的基礎(chǔ)函數(shù)是plot(x,y),其中x和y是數(shù)值型向量，代表圖形中的(x,y)點(diǎn)。如果樣本變量只有一個(gè)，則需要把參數(shù)x設(shè)置為樣本數(shù)據(jù)。21>par(mfrow=c(1,2))>#繪制一維數(shù)據(jù)>plot(x=rnorm(10))>#繪制二維數(shù)據(jù)>plot(women)>par(mfrow=c(1,1))PAGE22散點(diǎn)圖矩陣散點(diǎn)圖矩陣是散點(diǎn)圖的高維擴(kuò)展,它從一定程度上克服了在平面上展示高維數(shù)據(jù)的困難,在展示多維數(shù)據(jù)的兩兩關(guān)系時(shí)有著不可替代的作用。R語(yǔ)言中有多種繪制散點(diǎn)圖矩陣的函數(shù)。plot()函數(shù)可以繪制散點(diǎn)圖矩陣，此外基礎(chǔ)包還有專門繪制散點(diǎn)圖矩陣的pairs()函數(shù)。22>#繪制散點(diǎn)圖矩陣>plot(iris[,1:4],col=iris$Species,+main="利用plot函數(shù)繪制散點(diǎn)圖矩陣")>#方法一>pairs(iris[,1:4],col=iris$Species,+main="利用pairs函數(shù)繪制散點(diǎn)圖矩陣")>#方法二>pairs(~Sepal.Length+Sepal.Width+Petal.Length+Petal.Width,+data=iris,col=iris$Species,+main="利用pairs函數(shù)繪制散點(diǎn)圖矩陣")PAGE23高密度散點(diǎn)圖當(dāng)點(diǎn)非常多時(shí)，有些點(diǎn)可能重疊在一起，通過(guò)plot()函數(shù)無(wú)法體現(xiàn)點(diǎn)的密集情況，此時(shí)可以通過(guò)smoothScatter()函數(shù)來(lái)實(shí)現(xiàn)。23>#創(chuàng)建一個(gè)大數(shù)據(jù)集>n<-10000>x1<-matrix(rnorm(n),ncol=2)>x2<-matrix(rnorm(n,mean=3,sd=1.5),ncol=2)>M<-rbind(x1,x2)>#利用plot與smoothScatter函數(shù)繪制散點(diǎn)圖>par(mfrow=c(1,2))>plot(M,main="利用plot函數(shù)繪制普通散點(diǎn)圖")>smoothScatter(M,main="利用smoothScatter函數(shù)繪制高密度散點(diǎn)圖")>par(mfrow=c(1,1))PAGE24氣泡圖-plot()函數(shù)散點(diǎn)圖只能較好地展示二維數(shù)據(jù)，氣泡圖則是在其基礎(chǔ)上通過(guò)散點(diǎn)的大小來(lái)表達(dá)第三維變量的數(shù)值。同樣，也可以使用plot()函數(shù)繪制氣泡圖，通過(guò)將第三個(gè)變量賦予參數(shù)cex來(lái)控制氣泡的大小。24>#氣泡圖>data("diamonds",package="ggplot2")>#隨機(jī)抽取500個(gè)樣本>set.seed(1)>diamonds1<-diamonds[sample(1:nrow(diamonds),500),]>attach(diamonds1)>#計(jì)算鉆石體積>volumn<-x*y*z>#把鉆石體積進(jìn)行歸一化處理，并賦予對(duì)象size>size<-(volumn-min(volumn))/(max(volumn)-min(volumn))>#利用plot函數(shù)繪制氣泡圖>plot(carat,price,cex=size*2)PAGE25氣泡圖-symbols()函數(shù)也可以用symbols()函數(shù)來(lái)創(chuàng)建氣泡圖。該函數(shù)可以在指定的(x,y)坐標(biāo)上繪制圓圈圖、方形圖、星形圖、溫度計(jì)圖和箱線圖。以繪制圓圈圖為例：symbols(x,y,circle=r)，其中參數(shù)x、y和circle分別表示X軸、Y軸和圓圈半徑。25>#利用symbols函數(shù)繪制氣泡圖>set.seed(111)>x<-rnorm(10)>y<-rnorm(10)>r<-abs(rnorm(10))>symbols(x,y,circle=r,+bg=rainbow(10))PAGE26線圖通過(guò)設(shè)置plot()函數(shù)的參數(shù)type，將圖上的散點(diǎn)從左往右連接起來(lái)，就可以得到一個(gè)線圖。在繪制線圖時(shí)，參數(shù)type可以設(shè)置的值如表所示。26類型類型描述l表示畫線b表示同時(shí)畫點(diǎn)和線，但點(diǎn)線不相交c表示將type=＂b＂中的點(diǎn)去掉，只剩下相應(yīng)的線條部分o表示同時(shí)畫點(diǎn)和線，且相互重疊s表示畫階梯線，從一點(diǎn)到下一點(diǎn)時(shí)，先畫水平線，再畫垂直線S也是畫階梯線，從一點(diǎn)到下一點(diǎn)時(shí)，先畫垂直線，再畫水平線>type<-c('l','b','c','o','s','S')>par(mfrow=c(2,3))>for(iin1:6){+plot(1:10,type=type[i],main=paste0("type=",type[i]))+}>par(mfrow=c(1,1))PAGE27柱狀圖在R語(yǔ)言中用barplot()函數(shù)可以繪制柱狀圖和條形圖。下表給出了barplot()函數(shù)的主要參數(shù)說(shuō)明。27參數(shù)說(shuō)明height繪圖的數(shù)據(jù)，如果繪制一組數(shù)據(jù)，則以向量形式輸入，如果繪制多組數(shù)據(jù)，則以矩陣形式輸入，每行表示一組數(shù)據(jù)horiz如果是FALSE（默認(rèn)）則繪制柱狀圖，如果是TRUE則繪制條形圖beside如果是FALSE（默認(rèn)）則不同組數(shù)據(jù)垂直堆積展示（堆積柱狀圖），如果是TRUE則不同組數(shù)據(jù)水平并列展示（分組柱狀圖）width數(shù)值向量，表示柱子的寬度names.arg設(shè)置各個(gè)柱子(或各組柱子)名稱的字符向量add邏輯值，表示是否在已有圖形上添加柱子legend.text字符向量或邏輯值，如果設(shè)置的是邏輯值，圖例就用height的行名稱來(lái)設(shè)置，如果設(shè)置的是字符向量，圖例中就會(huì)使用設(shè)置的字符向量>par(mfrow=c(1,2))>for(iinc(FALSE,TRUE)){+barplot(VADeaths,horiz=i,beside=T,col=rainbow(5))+}>par(mfrow=c(1,1))PAGE28餅圖餅圖為一個(gè)有許