多元統(tǒng)計作業(yè)

1、多元統(tǒng)計上機(jī)作業(yè)：為了了解某種橡膠的性能，今抽取10 個樣本，每個測量三項指標(biāo)：硬度、變形和彈性，其數(shù)據(jù)如下表：序號硬度變形彈性1 65 45 27.6 2 70 45 30.7 3 70 48 31.8 4 69 46 32.6 5 66 50 31.0 6 67 46 31.3 7 68 47 37.0 8 72 43 33.6 9 66 47 33.1 10 68 48 34.2 試計算樣本均值、樣本離差陣、樣本協(xié)方差陣和樣本相關(guān)陣解答方法：方法一：首先用 excel 制作一個表格保存為文本文件txt 格式，再用以下命令在r 語言進(jìn)行讀?。?data1=read.table(d:zuoy

2、e.txt) data1 v1 v2 v3 1 65 45 27.6 2 70 45 30.7 3 70 48 31.8 4 69 46 32.6 5 66 50 31.0 6 67 46 31.3 7 68 47 37.0 8 72 43 33.6 9 66 47 33.1 10 68 48 34.2 1.樣本均值 yangbenjunzhi=colmeans(data1) yangbenjunzhi v1 v2 v3 68.10 46.50 32.29 2.樣本協(xié)方差陣 xiefangchazhen= cov(data1) xiefangchazhen v1 v2 v3 v1 4.7666

3、67 -1.9444444 1.9344444 v2 -1.944444 3.8333333 0.6166667 v3 1.934444 0.6166667 6.1898889 3.樣本相關(guān)陣 xiangguanzhen=cor(data1) xiangguanzhen v1 v2 v3 v1 1.0000000 -0.4548832 0.3561291 v2 -0.4548832 1.0000000 0.1265962 v3 0.3561291 0.1265962 1.0000000 4.樣本離方差陣 n=3 lichazhen lichazhen v1 v2 v3 v1 9.533333

4、-3.888889 3.868889 v2 -3.888889 7.666667 1.233333 v3 3.868889 1.233333 12.379778 方法二：首先輸入數(shù)據(jù) x1=c(65,70,70,69,66,67,68,72,66,68) x2=c(45,45,48,46,50,46,47,43,47,48) x3=c(27.6,30.7,31.8,32.6,31.0,31.3,37.0,33.6,33.1,34.2) x=cbind(x1,x2,x3) x x1 x2 x3 1, 65 45 27.6 2, 70 45 30.7 3, 70 48 31.8 4, 69 46

5、32.6 5, 66 50 31.0 6, 67 46 31.3 7, 68 47 37.0 8, 72 43 33.6 9, 66 47 33.1 10, 68 48 34.2 1.樣本均值 x1.mean=mean(x1) x2.mean=mean(x2) x3.mean=mean(x3) x1.mean 1 68.1 x2.mean 1 46.5 x3.mean 1 32.29 2.樣本協(xié)方差陣 x.cov=cov(x) x.cov x1 x2 x3 x1 4.766667 -1.9444444 1.9344444 x2 -1.944444 3.8333333 0.6166667 x3

6、1.934444 0.6166667 6.1898889 3.樣本相關(guān)陣 x.cor=cor(x) x.cor x1 x2 x3 x1 1.0000000 -0.4548832 0.3561291 x2 -0.4548832 1.0000000 0.1265962 x3 0.3561291 0.1265962 1.0000000 4.樣本離方差陣 x.licha=2*x.cov x.licha x1 x2 x3 x1 9.533333 -3.888889 3.868889 x2 -3.888889 7.666667 1.233333 x3 3.868889 1.233333 12.379778 總結(jié)：以上兩種方法的區(qū)別主要是數(shù)據(jù)的引入不同，方法一中通過創(chuàng)建excel 表格保存成 txt 文本引入數(shù)據(jù)，此方法適用于數(shù)據(jù)較多的情況，方便調(diào)用與保存。但是在數(shù)據(jù)少的時候應(yīng)用此方法則是將簡單弄成復(fù)雜化。而方法二中則是通過c()