【最新范文】R語言 實(shí)驗(yàn)5 R繪圖(二)

最新范文最新范文R語言實(shí)驗(yàn)5R繪圖（二）實(shí)驗(yàn)?zāi)康?1?熟練掌握描述性統(tǒng)計(jì)分析中常用的統(tǒng)計(jì)量；2?掌握R語言的高水平作圖命令；3?掌握R語言的低水平作圖命令；4?掌握多元數(shù)據(jù)的三個(gè)數(shù)據(jù)特征:均值向量、協(xié)方差矩陣、相關(guān)系數(shù)矩陣。二、實(shí)驗(yàn)內(nèi)容:練習(xí):要求:①完成練習(xí)并粘貼運(yùn)行截圖到文檔相應(yīng)位置（截圖方法見下），并將所有自己輸入文字的字體顏色設(shè)為紅色（包括后面的思考及小結(jié)）,②回答思考題，③簡(jiǎn)要書寫實(shí)驗(yàn)小結(jié)。④修改本文檔名為“本人完整學(xué)號(hào)姓名T,其中1表示第1次實(shí)驗(yàn)，以后更改為2,3,..?。如文件名為“1305543109張立1”,表示學(xué)號(hào)為1305543109的張立同學(xué)的第1次實(shí)驗(yàn)，注意文件名中沒有空格及任何其它字符。最后連同數(shù)據(jù)文件、源程序文件等（如果有的話，本次實(shí)驗(yàn)沒有），一起壓縮打包發(fā)給課代表，壓縮包的文件名同上。截圖方法：法1：調(diào)整需要截圖的窗口至合適的大小，并使該窗口為當(dāng)前激活窗口（即該窗口在屏幕最前方），按住鍵盤Alt鍵（空格鍵兩側(cè)各有一個(gè)）不放,再按鍵盤右上角的截圖鍵（通常印有“印屏幕”或“PrScrn”等字符），即完成截圖。再粘貼到word文檔的相應(yīng)位置即可。法2:利用QQ輸入法的截屏工具。點(diǎn)擊QQ輸入法工具條最右邊的“扳手”圖標(biāo)，選擇其中的“截屏”工具。）1■自行完成教材P130頁開始的3.3-3.4節(jié)中的例題。2.（習(xí)題3.5）小白鼠在接種了3種不同菌型的傷寒桿菌后的存活天數(shù)如下表所示，試?yán)L出數(shù)據(jù)的箱線圖（采用兩種方法,一種是plot語句，另一種是boxplot語句）來判斷小白鼠被注射3種菌型后的平均存活天數(shù)有無顯著性差異？白鼠試驗(yàn)數(shù)據(jù)菌型存活天數(shù)12432斗712254256E5107123266371J667955106330因此，這里考慮用箱線圖中的中位數(shù)來進(jìn)行比較。解:源代碼：yv-c（24324,7,7,22545,6,8,5,10,7,12,12,6,6,7,11,6,6,7,9,5,5,10,6,3,10）fv-factor(c(rep(1,11),rep(2,10),rep(3,12)))plot(f,y)Av-c(2,4,324,7,7,225,4)Bv-c(5,6,8,5,10,7,12,1266)Cv-c(7,11,6,6,7,9,5,5,10,6310)boxplot(A,B,C)運(yùn)行截圖：結(jié)論：從箱線圖中可以看到，菌型2和3的平均存活天數(shù)無顯著差異，但是與菌型1的有顯著差異3.(習(xí)題3.6)繪出習(xí)題3.16關(guān)于3項(xiàng)指標(biāo)的離散圖,從圖中分析例3.16的結(jié)論的合理性。序號(hào)硬度XI變形X?憚性X3165斗52%270斗530.7370斗S31.84694&32.6566503106674H31.376S斗737/0872斗3?王&966斗了33.1106S4834.2注:1.繪出的圖形類似教材P133頁的圖3.8。2.把上述表格分復(fù)制到記事本中即可實(shí)現(xiàn)表格轉(zhuǎn)化為文本，再用read.table()函數(shù)存入到數(shù)據(jù)框中即可，避免輸入麻煩。解:源代碼：df<-read.table("例3.6_data",header=T)dfpairs(df)運(yùn)行截圖：結(jié)論：具有相關(guān)關(guān)系的兩個(gè)變量的散點(diǎn)圖要么是從左下角到右上角（即正相關(guān)關(guān)系），要么是從左上角到右下角（即負(fù)相關(guān)關(guān)系）。但從上圖可知所有的圖中都沒有這樣的趨勢(shì)，故均不相關(guān)。4.（習(xí)題3.7）某校測(cè)得19名學(xué)生的四項(xiàng)指標(biāo)，性別、年齡、身高（cm）和體重（lb）,

具體數(shù)據(jù)如下表所示。⑴試?yán)L出體重對(duì)于身高的散點(diǎn)圖;⑵繪出不同性別情況下,體重與身高的散點(diǎn)圖;(coplot(a~b|c))⑶繪出不同年齡段的體重與身高的散點(diǎn)圖;學(xué)號(hào)姓名性別年齡'身高怵重：＜01.AliceF13'56,5B4.002EieckaF1365.398.003GailF1464390.004ECiirenF12'56.377.005KathyF1259.384.506MaryF1566.5112.007ScindyF115L350.5OSShaiTJiiF15&2.5212,509TammyF1462.8102.5AlfredM1469.0112,5][DukeM1斗63.5302.512GuidoM1567.0133.013JtimesM125X383.01斗JcffineyM1362.5E4.015JohnM1259內(nèi)99.5lf>PhilipM1672.015(｝心17M1264.8128.038ThomasM1157.5E5.019Willism1566l5112.0解:源代碼:efv-read.table(file.choose(),header=T);ef>attach(ef)plot(體重~身高)>coplot（體重~身高I性別）coplot（體重~身高I年齡）>coplot（體重~身高年齡+性別）運(yùn)行截圖:550065身高最新范文最新范文Giv&n:性別55606570導(dǎo)7K—◎C-R.M§0■:><!■■0O堆°g-8-03&<:■0O55606570身高Given:年齡14Given:年齡1411125560657055606570C1:11:■C1:11:■□U0C'J匸廿□□□UOSC□□□UUOGiv&n:性別55606570導(dǎo)7K—◎C-R.M§0■:><!■■0O堆°g-8-03&<:■0O55606570身高Given:年齡14Given:年齡1411125560657055606570C1:11:■□U0C'J匸廿□□□UOSC□□□UUO最新范文最新范文最新范文最新范文5.（習(xí)題3.8）畫出函數(shù)z=x4-2x2y+x2-2xy+2y2+9x/2-4y+4在區(qū)域-2<x<3,-1<y<7上的三維網(wǎng)格曲面和二維等值線，其中x與y各點(diǎn)之間的間隔為0.05,等值線的值分別為0,1,2,3,4,5,10,15,20,30,40,50,60,80,100，共15條。（注:在三維圖形中選擇合適的角度）解:源代碼：xv-seq（-2,3,0.05）yv-seq(-1,7,0.05)fv-function(x,y)xA4-2*xA2*y+xA2-2*x*y+2*yA2+9*x/2-4*y+4fv-function(x,y)zv-outer(xyf)contour(x,y,z,levels=c(0,1,2,3,4,5,10,15,20,30,40,50,60,80,100),col="black")>persp(x,y,z,theta=30,phi=30,expand=0.7,col="lightblue")運(yùn)行截圖：5D30斗閔10235D30斗閔1023（習(xí)題3.9）用Pearson相關(guān)檢驗(yàn)法檢驗(yàn)習(xí)題3.7中的身高與體重是否相關(guān)。解:源代碼：cor.test（身高，體重）運(yùn)行截圖：、co-.te3t（身高F體童）Pearsan1sprodact-moir.entcorrelationd己w；身咼伎童t=飛'=工了『p-val'ae=Saltemativ亡aypot-ri亡已1已；tr'jecorrelationisnoteq'aalto035衛(wèi)亡rcentconfidenceinterval:0.704^3140.95231D1samplee3tiir.at.es:cor0.3777352結(jié)論：其P值為7.887e-07v0.05,拒絕原假設(shè),認(rèn)為變量身高與體重相關(guān)。（習(xí)題3.10）繪出例3.17中48號(hào)求職者數(shù)據(jù)的星圖。（數(shù)據(jù)見文檔最后）（1）以15項(xiàng)自變量FL,APP,…,SUIT為星圖的軸；（2）以G1,G2,…,G5為星圖的軸。（提示:先）通過這些星圖，能否說明應(yīng)選哪6名應(yīng)聘者。為使星圖能夠充分反映應(yīng)聘者的情況，在作圖中可適當(dāng)調(diào)整各種參數(shù)。提示:第(2)小題，先利用教材P153頁的公式,計(jì)算出48個(gè)求職者這5個(gè)變量的值，公式如下：G1v-(SC+LC+SMS+DRV+AMB+GSP+P0T)/7G2v-(FL+EXP+SUIT)/3G3v-(LA+HON+KJ)/3G4v-AAG5<-APP再將Gl,…,G5這5個(gè)列向量(即48行5列數(shù)據(jù))賦值一個(gè)新的數(shù)據(jù)框,再按第(1)小題的方法繪出星圖。解:源代碼：Xv-read.csv("applicant.csv")stars(X)attach(X)X$G1v-(SC+LC+SMS+DRV+AMB+GSP+POT)/7>X$G2v-(FL+EXP+SUIT)/3X$G3<-(LA+HON+KJ)/3X$G4<-AAX$G5<-APP>rtv-scale(X[,17:21])>stars(rt)運(yùn)行截圖:思考：R語言的高水平作圖函數(shù)與低水平作圖函數(shù)的主要區(qū)別是什么？所謂高水平函數(shù)是與低水平作圖函數(shù)相對(duì)應(yīng)的，即所有的繪圖函數(shù)均可產(chǎn)生圖形，可以有坐標(biāo)軸，以及圖和坐標(biāo)軸的說明文字。plot()函數(shù)除了能畫出散點(diǎn)圖外，還能畫什么圖？能畫出曲線圖嗎？曲線圖，箱線圖；能3■多元數(shù)據(jù)主要有哪三個(gè)數(shù)據(jù)特征指標(biāo)？均值向量、協(xié)方差矩陣、相關(guān)系數(shù)矩陣4?相關(guān)檢驗(yàn)的原假設(shè)是什么？總體X,Y不相關(guān)5?多元數(shù)據(jù)的圖形表示方法主要有哪幾種圖？輪廓圖，星圖，調(diào)和曲線圖三、實(shí)驗(yàn)小結(jié)(必寫，但字?jǐn)?shù)不限)本次實(shí)驗(yàn)，主要是在星圖方面有些阻礙,用不同的函數(shù)讀取的結(jié)果會(huì)不一樣，有時(shí)還讀不出來,最終還是把數(shù)據(jù)存入excel中，才能成功。要附學(xué)會(huì)描述性統(tǒng)計(jì)分析中常用的統(tǒng)計(jì)量，高水平作圖函數(shù)與低水平圖函數(shù)的區(qū)別。IDFLAFPAALASCLCHONSMSEXPDRVAMBGSFPOTKJSUIT1&72"587833'89承7'571029105810才9：ie5'99￡8"8&l(J37s3：698g7499"8'：6&104§fi8：5ft§g2fi4'5$876J55&88；844g§B5'5$S'87767776g7s96“5S66579gg8aS8s：108'iaSg&1()gg'S9g/r