r語(yǔ)言軟件入門指導(dǎo)-資料下載頁(yè)
2024-12-07 22:17本頁(yè)面
【正文】 c分別接種于 10， 9，和 11只小白鼠上，觀察其存活天數(shù)，問(wèn)三種菌型下小白鼠的平均存活天數(shù)是否有顯著差異。 a菌株： 2, 4, 3, 2, 4, 7, 7, 2, 5, 4 b菌株： 5, 6, 8, 5, 10, 7, 12, 6, 6 c菌株： 7,11,6, 6, 7, 9, 5, 10, 6, 3, 10 69 準(zhǔn)備數(shù)據(jù)表 圖 15 數(shù)據(jù)表的準(zhǔn)備 day和 type 各為一列 70 例 2：方差分析 (續(xù) ) 數(shù)據(jù)讀取，將 bac中， header=T表示保留標(biāo)題行。 bac(d:/,header=T) 將 ba數(shù)據(jù)框中的 type轉(zhuǎn)換為因子 (factor) bac$type(bac$type) aov(lm(day~type, data=bac)) summary() boxplot(day~type,data=bac,col=red) 71 圖 16 三種菌型對(duì)小白鼠影響的箱線圖 72 例 3線性回歸 轉(zhuǎn)速rpm 20 22 24 26 28 30 32 34 36 38 40 42 雜質(zhì)率% ? 對(duì)一批涂料進(jìn)行研究，確定攪拌速度對(duì)雜質(zhì)含量的影響，數(shù)據(jù)如下，試進(jìn)行回歸分析 表 3 攪拌速度對(duì)涂料中雜質(zhì)的影響 73 ratec(20, 22, 24, 26, 28, 30, 32, 34, 36, 38, 40, 42) impurity c(, , , , , , , , , , , ) plot(impurity~rate) reglm(impurity~rate) abline(reg,col=red) summary(reg) 74 四 簡(jiǎn)單編程 75 編程基礎(chǔ) R可以靈活的編寫程序，用戶自己編寫的程序可以直接調(diào)用。 基本格式 函數(shù)名 function(數(shù)據(jù) ,參數(shù) 1= 默認(rèn)值 ,…) { 表達(dá)式 (循環(huán) /判別 )。 return(返回值 )。 } 函數(shù)內(nèi)部也可用 添加注釋 76 程序流程控制 if if(條件 ) 表達(dá)式 if(條件 ) 表達(dá)式 1 else 表達(dá)式 2 舉例 { if(p=) print(p = !) else print(p !) } 77 循環(huán) for, while for(變量 in 向量 ) 表達(dá)式 用法： for(i in 1:10) print(i) while(條件 ) 表達(dá)式 用法 : i 1 while(i10) { print(i) i i + 1 } 78 返回值 ? 返回值表示函數(shù)輸出的結(jié)果。 ? 返回值必須是一個(gè)對(duì)象。 ? R默認(rèn)將最后一行作為返回值。 ? 如果函數(shù)的結(jié)果需要有多個(gè)返回值，可以創(chuàng)建一個(gè)list()，并返回該對(duì)象。 ? 也可以用 return()函數(shù)，設(shè)定返回值。 ? 但是一個(gè)函數(shù)的返回的對(duì)象只有一個(gè)。 79 簡(jiǎn)單函數(shù)舉例 問(wèn)題 :輸入直角三角形的兩個(gè)邊長(zhǎng)，求其斜邊長(zhǎng)。 定義函數(shù)： rcal = function(x,y) { z x^2 + y^2 result sqrt(z) return(result) } 調(diào)用函數(shù)： rcal(3,4) 80 條件函數(shù)舉例 問(wèn)題 :判斷 P值得顯著性 定義函數(shù)： pvalue function(x) { if (x) v=c(significent) else v=c(not significent) return(v) } 81 條件函數(shù)舉例 問(wèn)題 :判斷 P值得顯著性 定義函數(shù)： pvalue function(data1) { v=vector() for(i in 1:length(data1)) {if (data1[i]) v[i]=c(significent) else v[i]=c(not significent)} return(v) } 82 推薦的教材 ? Crawley Statistics an introduction using R ? Peter Dalgaard Introductory statistics with R ? E. Paradis R for Beginners ? Verzani SimpleR. ? D G Rossiter Introduction to the R Project for Statistical Computing for use at ITC ? J. Maindonald Using R for data analysis and graphics introduction code and mentary using R ? Venables, W. N. amp。 Ripley, B. D. Modern Applied Statistics with S 83 R網(wǎng)絡(luò)資源 R主頁(yè) : R資源列表 NCEAS R Graphical Manual 統(tǒng)計(jì)之都 : QuikR 丁國(guó)徽的 R文檔 : R語(yǔ)言中文論壇 持之以恒 =R的高手！
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1