R語言數(shù)據(jù)可視化介紹課件

1、R語言數(shù)據(jù)可視化介紹1H O O直方圖箱線圖 11s u a i:cN O O0 0 0歸且口r口40。0 -Cl -寸。N一o -5060條形圖70 80 90110D D 口a WRua l M a l eRua l f em al eub ali M aleLI巾alil F ema J侖舊叫LL -w-已 lr.1們?nèi)视?lrlrl 廠T3(l) 一過 _0- L).卜-1Il-7卜亡二D-1卜- - -II -1II1015I:20關(guān)聯(lián)圖I25- .-擊笆iii - -一一-一-血 。巴后早- - 早_B哀X。515一一： i - - 一一早2025w-: .了.一“ “ 會(huì)產(chǎn). .

2、，口 i3 小 .” 1 。令 八V凸 心 幾,. “ ,”心心，。Q . . . ，. ，.，.一- 一i .于 . , 儼，.一 5-一 d一 儼, , . . . .d “ “ - - ，,. . . . . . .”5. Q . . - ， , . , 儼？， ， ，j， . . .于:寧士中 氣丿, .1 .-.i. .儼. . . .， ，“, .立.二.- -儼L l-.，L一. 一-. ”己”- o - ， - - 儼 ” 一一一一一一. J . j ， 1，1 ”.- 令. - -0 .-. . .一玉，V- .凡 - “ “ -. .， - - . . . ，- 儼儼, 1

3、, .,.J.l (I.入慫。. -了0L745.0L64Oi-54日l ac k巳r叨 們Re d巳lond點(diǎn)圖3低級繪圖函數(shù)：hist(x$x1)# 對科目1繪制直方圖，橫坐標(biāo)表示分?jǐn)?shù)區(qū)間，縱坐標(biāo)表示頻次。plot(x$x1,x$x2)# 對科目1和科目2繪制散點(diǎn)圖，大致看出兩門課是否存在相關(guān)關(guān) 系。table(x$x2)#列聯(lián)函數(shù)table，對每個(gè)數(shù)據(jù)進(jìn)行統(tǒng)計(jì)。barplot(table(x$x2)# 柱狀圖繪制函數(shù)barplot對統(tǒng)計(jì)結(jié)果進(jìn)行繪制。barplot必須和table函數(shù)結(jié)合使用才有意義。pie(table(x$x2)# 餅圖函數(shù)pie。boxplot(x$x1,x$x2,x

4、$x3)# 箱線圖boxplot，對三門科目畫箱線圖。boxplot(x2:4,col=c(red,green,blue)# 指定箱線圖的顏色。boxplot(x2:4,col=c(red,green,blue),horizontal=T)# 使用horizontal=T將箱線圖水平放置。stars(x2:4)# 對每個(gè)人畫雷達(dá)圖。stars(x2:4,draw.segments=T)# 對雷達(dá)圖進(jìn)行顏色和樣式的修改。使用draw.segments=T畫扇形。stem(x$x1)# 莖葉圖#此外，還有多種高級繪圖函數(shù)points，lines，abline，title，text，axis，ima

5、ge，box，contour，rect，arrows，par等。45用plot繪制散點(diǎn)圖的參數(shù)設(shè)置plot(x$x1,x$x2,main=科目1與科目2的關(guān)系, #設(shè)置標(biāo)題xlab=科目1,#設(shè)置橫坐標(biāo)名稱，如果不寫則默認(rèn)為該變量的名稱ylab=科目2,#設(shè)置縱坐標(biāo)名稱xlim=c(50,100),#設(shè)置橫坐標(biāo)的范圍ylim=c(50,100),#設(shè)置縱坐標(biāo)的范圍xaxs=r,#xaxs=r, yaxs=i:分別設(shè)定 x 和y 軸的形式。 i(內(nèi)部)與 r(預(yù)設(shè) 值) 形式的刻度都會(huì)依照資料的范圍而自動(dòng)調(diào)整,但是 r 形式的刻度會(huì)在刻 度范圍兩邊留一些空隙。yaxs=r,col=red,#設(shè)置

6、點(diǎn)的顏色pch=20 #設(shè)置畫圖的樣式，20表示為圓點(diǎn))6關(guān)于點(diǎn)的樣式，上面顯示用的是編號(hào)為20的樣式，那么R其實(shí) 提供了很多樣式供使用，如下圖。參考R語言繪圖符號(hào)高級繪圖函數(shù)：.ug-區(qū) .( I)( 叩 _cartestao(Xll m=c.也勻）烏 .,_, NHI J 口乙 ， 心 寸 c oc 心 八 立 thIIUld a:;:,cict勹 加 工 :allCll,. n 打f 如w七a:ts ra -3nx:-.;ri;r.1 f.itout人 暴 J )1 I I勹1:尸xi Ca心可 立, :1 n立 E-11勺圖，luncuc(lC, 2切Iggplot2是一個(gè)用來繪制圖形

7、的R軟件包。與其他大多數(shù)的圖形軟件包不同，ggplot是由其背后的一套圖形語法所支持。ggplot2可以繪制出很多美觀的圖形，同時(shí)能避免諸多繁瑣的細(xì)節(jié)。采用了圖層的設(shè)計(jì)方式，從原始圖層開始，首先 繪制原始數(shù)據(jù)，然后不斷添加圖形注釋和統(tǒng)計(jì)匯總結(jié)果。ggplot2可以幫助學(xué)生 鍛煉結(jié)構(gòu)化的分析思維，進(jìn)而達(dá)到專業(yè)的水準(zhǔn)。在ggplot2中，用于創(chuàng)建新圖形 的表達(dá)式是由高級的圖形元素組成的，例如對原始數(shù)據(jù)的展現(xiàn)，以及某些統(tǒng)計(jì) 變換等。ggplot2圖形的基本組成部分：1）geom_area()用于繪制面積圖，即在普通線圖的基礎(chǔ)上，依y軸方向填充了下 方面積的圖形。2）geom_bar(stat = “

8、identity”)用于繪制條形圖，需要指定stat = “identity”，因?yàn)槟J(rèn)的統(tǒng)計(jì)變換將自動(dòng)對值進(jìn)行計(jì)數(shù)。geom_line()繪制線條圖，圖形屬性group決定了哪些觀測是連接在一起的。geom_point()繪制散點(diǎn)圖。 5）geom_polygon()繪制多邊形，即填充后的路徑。geom_text()可在指定點(diǎn)處添加標(biāo)簽。geom_tile()用來繪制色深圖或水平圖。lattice,是由Deepayan1 S arkar基干grid包的一套統(tǒng)計(jì)圖形系統(tǒng)， 它的圖形設(shè) 計(jì)理念來自于Cleveland的Trellis圖形， 其主要特征是根據(jù)特定變噩（往往是分類變量）將數(shù)據(jù)分解為若

9、干子集 ，并 中的條件期望、條件概率一樣， lattic-e的圖對每個(gè)子集畫圖 。就像數(shù)理統(tǒng)計(jì) 形也是一種“條件作圖” 。格包中的高級函數(shù)如下：函數(shù)默認(rèn)顯示histogram直方圖densit:yplot核密度圖qqimath qq stripplot bWplot dotplot barchart埋論分位數(shù)圖 雙樣本分位數(shù)圖 帶形圖盒圖克里夫蘭點(diǎn)圖 條形圖函數(shù) xyplot spllom1 coritourplot levelplotw1ireframecloud parallel默認(rèn)顯示 散點(diǎn)圖散點(diǎn)圖陣列 表面等高線圖 表面?zhèn)紊蕡D三維表面透視圖 三維散點(diǎn)圖平行坐標(biāo)圖以latt ice包中

10、的densit ypl ot O函數(shù)為例IIISoprano 2603ggooook 荔U 中G0420oo悶oo00005060IIII708090ISoprano 1Alto 2Alto 1Tenor .2Teno 1彗Bass 2Bass 1IIIIIIIIII50即70的OO00060402仆: 幾hu仆寧-require(st at s)hist ogrnm h eiight I voice.part, data = siinger, nint = 17,endpoints = c(59.5, 76.,5), lay out = c(2,4), aspect = 1,xllab =

11、11Height (in ches)1)h ist ogrnm h eiight I voice. part, data = siinger, xllab = 11Height (in ches)ty pe = 11densiit y panell = fu nct io n(x, .,.) pan el.hist ogram(x, .戶pan el.mat hd ensity(dmat h = dnorm, coll = 11blad c11,args = list (mean=mean(,x),sd=sd(x)）densityplot(height I voice.part, data =

12、 siinger, layout = c(24),xlab = 1Height (inches V, bw = ,5)附錄1 數(shù)據(jù)生成ID = seq(1,100)# 用seq函數(shù)產(chǎn)生100個(gè)數(shù)字，表示不同人的ID。x1 = round(runif(100,min=50,max=100) #用runif函數(shù)產(chǎn)生100個(gè)隨機(jī)數(shù)（隨機(jī) 數(shù)是小數(shù)），代表科目1的成績，該結(jié)果是均勻分布，用round函數(shù)對其取整。 x2 = round(rnorm(100,mean=80,sd=7)#用rnorm函數(shù)產(chǎn)生正態(tài)分布數(shù)字，代表 科目2的成績，再用round函數(shù)取整。x3 = round(rnorm(100,

13、mean=90,sd=14)#用rnorm函數(shù)產(chǎn)生正態(tài)分布數(shù)字，代 表科目3的成績，再用round函數(shù)取整。x3which(x3100)=100#將超過100的修改為100。x = data.frame(ID,x1,x2,x3)# 將上面4個(gè)向量放到組合為數(shù)據(jù)框data.frame。附錄2 ggplotlibrary(ggplot2)p - ggplot(mtcars) summary(p)p - p + aes(wt, hp) summary(p)p - ggplot(mtcars, aes(x = mpg, y = wt) p + geom_point()p + geom_point(ae

14、s(colour = factor(cyl)p + geom_point(aes(y = disp)p - ggplot(mtcars, aes(mpg, wt)p + geom_point(colour = darkblue)p + geom_point(aes(colour = darkblue)library(nlme)#ggplot2用數(shù)據(jù)集：nlme包里有一個(gè)簡單的縱向數(shù)據(jù)集，26名男孩（Subject）在9個(gè)不同時(shí)期（Occasion）所測定的身高（height）和中心化后的年齡（age）p - ggplot(Oxboys, aes(age, height, group = Sub

15、ject) + geom_line() pp + geom_smooth(aes(group = Subject), method=”lm”, se=F)pp + geom_smooth(aes(group = 1), method=”lm”, size=2, se=F) pboysbox - ggplot(Oxboys, aes(Occasion, height) + geom_boxplot()boysboxboysbox+ geom_line(aes(group = Subject), colour=”#3366FF”) boysboxd - ggplot(diamonds, aes(carat) + xlim(0, 3)d +