r語(yǔ)言在概率與統(tǒng)計(jì)及線性代數(shù)領(lǐng)域中的應(yīng)用(專業(yè)版)
【正文】 P(蛀 | 找到) = p(找到|蛀) * p(蛀)/p(找到)說(shuō)明：P(蛀 | 找到) = , P(蛀)=, P(找到)=, P(找到 | 蛀)=P(蛀 | 找到) = = * (找到|蛀) * p(蛀)/p(找到) pab = sum(p[蛀,找])/sum(p[,找]) 。 在實(shí)務(wù)研究上，要重視“程序語(yǔ)言實(shí)作”的方式，因此采用R 這個(gè)專為機(jī)率統(tǒng)計(jì)而設(shè)計(jì)的語(yǔ)言來(lái)做研究，透過(guò) R 語(yǔ)言，我們可以較為輕松的實(shí)作出許多用傳統(tǒng)語(yǔ)言難以實(shí)作的程序范例，這些范例可以引導(dǎo)我們深入理解機(jī)率統(tǒng)計(jì)的理論，并且達(dá)到“以理論指導(dǎo)實(shí)務(wù)，以實(shí)務(wù)印證理論”的功能。 e exp(1)2 x 2 Matrix of class dtrMatrix[,1] [,2][1,] [2,] . expm stopifnot((e1x, c(e,0,e,e), tol = 1e15))expm (m2 Matrix(c(49, 64, 24, 31), nc = 2))2 x 2 Matrix of class dgeMatrix[,1] [,2][1,] 49 24[2,] 64 31expm (e2 expm(m2))2 x 2 Matrix of class dgeMatrix[,1] [,2][1,] [2,] expm (m3 Matrix(cbind(0,rbind(6*diag(3),0)))) sparse!4 x 4 sparse Matrix of class dtCMatrix[1,] . 6 . .[2,] . . 6 .[3,] . . . 6[4,] . . . .expm (e3 expm(m3)) upper triangular4 x 4 Matrix of class dtrMatrix[,1] [,2] [,3] [,4][1,] 1 6 18 36[2,] . 1 6 18[3,] . . 1 6[4,] . . . 1 str(e1)Formal class 39。 sample(1:6, 10, replace=T) [1] 4 3 2 4 1 6 4 2 5 1 sample(1:6, 10, replace=T) [1] 4 3 2 4 1 6 4 2 5 1 x sample(1:6, 10, replace=T) x [1] 1 2 5 2 4 1 4 4 6 5 x=2 x[1] 2 x sample(1:6, 10, replace=T) x [1] 2 4 2 2 5 4 4 5 3 2 sum(x=2)[1] 2 x sample(1:6, 10, replace=T) x [1] 4 1 6 2 1 3 5 5 3 6 x==2 [1] FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE sum(x==2)[1] 1 sum(x==6)[1] 2(2)統(tǒng)計(jì)抽樣結(jié)果： x sample(6,6000,replace=T) for (i in 1:6) print(sum(x==i))[1] 1036[1] 978[1] 1037[1] 1016[1] 986[1] 947繪制統(tǒng)計(jì)圖： x = sample(1:6, 10000, replace=T) hist(x)(3)用 R 軟件仿真撲克牌： num=1:13 type=c(a,b,c,d) num*type type=c(space, heart, diamond, club) interaction(num, type) [1] [7] [13] 52 Levels: ... Warning
數(shù)學(xué)相關(guān)推薦
鄂ICP備17016276號(hào)-1