應(yīng)用多元統(tǒng)計(jì)分析作業(yè)-展示頁(yè)
2025-07-08 02:16本頁(yè)面
【正文】 =FALSE)。box()。axis(1,at=1:16,labels=data[,1],=)。cut2cutree(Clu2,k=5)。axis(2,at=1:5,labels=1:5,=)。plot(cut1,pch=cut1,ylab=類(lèi)別編號(hào),xlab=省市,main=聚類(lèi)的成員,axes=FALSE)。繪出直觀的分類(lèi)情形oparpar(mfrow=c(2,2),las=2)。box()。plot(Clu4,labels=data[,1])。re3(Clu3,k=5,border=red)。box()。plot(Clu2,labels=data[,1])。re1(Clu1,k=5,border=red)。 離差平方和法繪出四種方法情況下的譜系圖和聚類(lèi)情況oparpar(mfrow=c(2,2))。 最長(zhǎng)距離法Clu3hclust(d=Dismatrix,method=centroid)。 計(jì)算樣本間的歐幾里得距離Clu1hclust(d=Dismatrix,method=single)。 讀取數(shù)據(jù)Cludatadata[,2:7]。試使用系統(tǒng)聚類(lèi)法和K均值法對(duì)這些地區(qū)進(jìn)行聚類(lèi)分析，并對(duì)結(jié)果進(jìn)行分析比較。距離判別的運(yùn)行結(jié)果： xc(53,1,9,18,50,) (x)該客戶(hù)屬于信用好的一類(lèi)費(fèi)希爾判別的運(yùn)行結(jié)果： xc(53,1,9,18,50,) (x)該客戶(hù)屬于信用好的一類(lèi) 從上面的運(yùn)行結(jié)果可以看出該客戶(hù)屬于信用好的一類(lèi)，即已履行還貸責(zé)任。 計(jì)算樣本到第一組的費(fèi)希爾判別函數(shù)值 d2abs(t(vector)%*%xt(vector)%*%u2)。 vectoralpha$vectors[,1]。 Bn1*n2*(u1u2)%*%t(u1u2)/(n1+n1)。 s2cov(G2)。 計(jì)算信用好的一組的數(shù)據(jù)均值 u2apply(G2,2,mean)。 n2nrow(G2)。 G2data[6:10,]。 構(gòu)造判別函數(shù) if(w=0) 結(jié)果輸出 cat(該客戶(hù)屬于信用好的一類(lèi),\n) else cat(該客戶(hù)屬于信用壞的一類(lèi),\n)}費(fèi)希爾判別法function(x){ data(,header=T,sep=,)。 alphasolve(s)%*%(u1u2)。 ss1+s2。 計(jì)算信用不好的樣本數(shù)據(jù)均值 s1cov(G1)。 u1apply(G1,2,mean)。 讀取數(shù)據(jù) G1data[1:5,]。⑵某客戶(hù)的如上情況資料為（53，1，9，18，50，），對(duì)其進(jìn)行信用好壞的判別。數(shù)據(jù)見(jiàn)壓縮包。 判別分析問(wèn)題重述：銀行的貸款部門(mén)需要判別每個(gè)客戶(hù)的信用好壞（是否未履行還貸責(zé)任），以決定是否給予貸款。)。) else cat(39。 if(pvalue) 結(jié)果輸出 cat(39。 計(jì)算F統(tǒng)計(jì)量 pvalue(1pf(Fstat,3,16+1631))。求逆矩陣 Tsq(16+162)*t(sqrt(16*16/(16+16)*(xbarybar)))%*%sinv%*%sqrt(16*16/(16+16)*(xbarybar))。 計(jì)算LF樣本協(xié)差陣 ycovcov(ydat)。 ybarapply(ydat,2,mean)。 xbarapply(xdat,2,mean)。實(shí)驗(yàn)硬件及軟件平臺(tái)：計(jì)算機(jī)、 R、 網(wǎng)絡(luò)實(shí)驗(yàn)內(nèi)容（包括實(shí)驗(yàn)具體內(nèi)容、算法分析、源代碼等等）： 指導(dǎo)教師意見(jiàn)：簽名： 年 月 日代碼及運(yùn)行結(jié)果分析 均值檢驗(yàn)問(wèn)題重述：某醫(yī)生觀察了16名正常人的24小時(shí)動(dòng)態(tài)心電圖，分析出早晨3小時(shí)各小時(shí)的低頻心電頻譜值（LF）、高頻心電頻譜值（HF），數(shù)據(jù)見(jiàn)壓縮包，試分析這兩個(gè)指標(biāo)的各次重復(fù)測(cè)定均值向量是否有顯著差異。
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1