R語(yǔ)言畫數(shù)據(jù)圖形

plot是一般的畫圖函數(shù)，hist是直方圖，boxplot是箱型圖。這些函數(shù)會(huì)覆蓋前面的圖形，如何創(chuàng)建多個(gè)圖形便于同時(shí)查看呢？方法有三：

1、創(chuàng)建新圖形之前先打開一個(gè)新的圖形窗口，每一幅新圖形會(huì)出現(xiàn)在最近的圖形窗口中。

dev.new() 語(yǔ)句1 dev.new() 語(yǔ)句2 ……

上面的語(yǔ)句，每顯現(xiàn)一幅圖形之前會(huì)新開一個(gè)窗口。

2、運(yùn)用圖形界面上的前進(jìn)后退按鈕即可。

3、可以使用dev.new,dev.next,dev.prev,dev.set等函數(shù)同時(shí)打開多個(gè)窗口，并選擇將哪個(gè)輸出到哪個(gè)窗口中。使用help(dev.cur)查看說(shuō)明。這個(gè)貌似比較麻煩。

如果將不同的圖形放在一個(gè)窗口中，可以先用par(mfrow = c(2,3))類似語(yǔ)句創(chuàng)建一個(gè)2行3列的圖形集合，然后用plot一個(gè)一個(gè)畫圖就行了，結(jié)果見(jiàn)下圖：

3.2一個(gè)簡(jiǎn)單的例子

3.3圖形參數(shù)

可以通過(guò)圖形參數(shù)自定義一幅圖的多個(gè)特征（字體、顏色、坐標(biāo)軸、標(biāo)題、圖例等）。par函數(shù)可以對(duì)圖形參數(shù)進(jìn)行設(shè)置，執(zhí)行par()可以查看各種參數(shù)，添加參數(shù)no.readonly = TRUE，可以查看可修改的參數(shù)列表。需要說(shuō)明的是，設(shè)置par之后在關(guān)閉軟件前（會(huì)話結(jié)束前）一直有效。

可以先記錄原始參數(shù)，然后結(jié)束一段語(yǔ)句之后再進(jìn)行還原。比如：

opar <- par(no.readonly=TRUE) #記錄初始設(shè)置 par(lty=2,pch =17) ... par(opar)    #進(jìn)行還原

當(dāng)然可以在plot函數(shù)的后面直接設(shè)置參數(shù)。并不是所有的參數(shù)都是可以指定的，用help函數(shù)可以查看具體函數(shù)。下面介紹一些圖形參數(shù)。

3.3.1符號(hào)和線條

開啟截圖模式：

具體的見(jiàn)下面截圖：

上圖中的21-25可以指定邊框的顏色(col=)和填充的顏色(bg=).

上面是線型的設(shè)置。

3.3.2下面是顏色的設(shè)置

上面是顏色的設(shè)置說(shuō)明，需要在具體的函數(shù)上進(jìn)行實(shí)現(xiàn)和驗(yàn)證。col函數(shù)后面可以用編號(hào)、顏色名稱、十六進(jìn)制顏色值、RGB、HSV等進(jìn)行設(shè)置。RGB是三原色，HSV是基于色相、飽和度、亮度來(lái)生成函數(shù)。colors可以查看所有顏色名稱，嗯，657種。

可以由很多函數(shù)來(lái)生成連續(xù)的顏色，rainrow(),heat.colors(),terrain.colors()topo.colors(),cm.colors()等，gray函數(shù)可以產(chǎn)生多階灰度，后面加一個(gè)0-1之間的向量。

pie函數(shù)用來(lái)畫餅圖，下面是一個(gè)例子：

par(mfrow = c(1,2))
n <- 10mycolors <- rainbow(n)
pie(rep(1:10),labels = mycolors,
    col = mycolors)
mygrays <- gray(0:n/n)
pie(rep(1,n),labels = mygrays,
    col = mygrays)

下面是結(jié)果：

3.3.3文本屬性

圖形參數(shù)可以指定字號(hào)、字體和字樣。下面是相關(guān)的參數(shù)說(shuō)明:

字體族是比較難以設(shè)置的。family這里的襯線、無(wú)襯線字體和等寬字體等可以設(shè)置，windo下分別映射為TT Times New Roman、TT Arial和TT Courier New。如果想用其他映射，可以用windoFonts函數(shù)進(jìn)行設(shè)置。用pdf輸出圖形，字體設(shè)置會(huì)簡(jiǎn)單一些，用names(pdfFonts())查看可用字體,輸出是只需要在pdf函數(shù)中增加參數(shù) family = “fontname”就可以了。PostScript格式（一種用來(lái)打印的格式字體）也是類似的道理。

3.3.4圖形尺寸與邊界尺寸

下面寫一個(gè)例子：

dose <- c(20,30,40,45,60)
dragA <- c(16,20,27,40,60)
dragB <- c(15,18,25,31,40)
opar <- par(no.readonly = TRUE)
par(pin = c(2,3))
par(lwd = 2,cex = 1.5)
par(cex.axis = .75,font.axis = 3)
plot(dose,dragA,type = "b",pch = 19,lty = 2,
     col = "red")
plot(dose,dragB,type = "b",pch = 23,lty = 6,
     col = "blue",bg = "green")#這里的col和bg是對(duì)pch=23的圖形進(jìn)行的設(shè)置，當(dāng)然這里的col也對(duì)線條顏色進(jìn)行了設(shè)置
par(opar)數(shù)據(jù)分析師培訓(xùn)

下面是結(jié)果：