《多元统计分析及R语言建模答案》由会员分享，可在线阅读，更多相关《多元统计分析及R语言建模答案（6页珍藏版）》请在装配图网上搜索。
1、多元统计分析及R语言建模第2章王斌会2020.2.1rm (list= Is () options (digits二 4) par (mar= c (4, 4,2,1) library (openxlsx) library (knitr)#清理内存#输出结果位数#设置图片输出位置2.1对下面的相关系数矩阵，试用R语言求其逆矩阵、特征根和特征向量。要求 写出R语言计算函数。1.000.800.260.670.340.801.000.330.590.34= 0.260.331.000.370.210.67 0.59 0.37 1.00 0.350.34 0.34 0.21 0.35 1.00R=m
2、atrix (c (1.00, 0.80 ,0.26, 0.67 ,0.34,0.80 , 1.00, 0.33 ,0.59, 0.34,0.26, 0.33 1.00 ,0.37, 0.21,0.67, 0.59 ,0.37, 1.00 ,0.35, 0.34,0.34,0.21,0.35,1.00), nrow= 5,ncol=5);R#生成矩阵R,1,2,3,4,51,1.000.800.260.670.342,0.801.000.330.590.343,0.260.331.000.370.214,0.670.590.371.000.355,0.340.340.210.351.00R.=
3、 solve (R);R.,1 ,2,3,4,51,3.3881 -2.12220.23706-1.0685-0.106232,-2.12222.9421-0.33593-0.1331-0.161643,0.2371 -0.33591.20699-0.3764-0.088124,-1.0685 -0.1331-0.376372.0091-0.215625,-0.1062 -0.1616-0.08812-0.21561.18505R.e= eigen (R, symmetrie = T);R.eeigen() decomposition$values1 2.7923 0.8263 0.7791
4、0.4206 0.1818$vectors,1,2,3,4,51,-0.52550.34022-0.16650.159380.744942,-0.51870.23435-0.17780.50823-0.621423,-0.3131-0.90308-0.22870.149430.108444,-0.49660.03869-0.1186-0.83116-0.216735,-0.3318-0.110840.93500.056160.013552.2某厂对50 个计件工人某月份工资进行登记，获得以下原始资料(单位：元)。 试按组距为300 编制频数表，计算频数、频率和累计频率，并绘制直方图。14651
5、760198522702980137517351940222026701405175519652240282012951645188021102550135517101910219026001265162518652095252012251605184520402430117518352030237010001535181020102290112515751815203023202.2.1写出R语言程序。d2.2=readxlsx(mvexer5.xlsx,sheet=E2. );(d2 )后六行X45 229046 112547 157548 181549 203050 2320先对数据进行
6、简单的统计分析：min(d2.2)1 1000max(d2.2)1 2980可以得到某月份最低工资为1000 元,最高工资为2980元。画出组距为300 的直方图：H1=hist(d2.2$X,breaks=seq(900,3000,300)#以组距为300 画直方图Histogram of d2.2$XAOUQJnba;in10001500200025003000d2 2$X编制频数表，列出频数、频率和累计频率：names(Hi)1 breakscountsdensity midsxnameequidistdataframe(组中值=H1$mids,频数=H1$counts,频率=H1$de
7、nsity*300,累计 频率=cumsum(H1$de nsi ty *300)组中值频数频率累计频率1105030.060.062135070.140.2031650100.200.4041950150.300.705225080.160.866255050.100.967285020.041.002.2.3用R语言作正态概率图并分析之:qqnorm(d2.2$X);qqline(d2.2$X)2.3以下是一份关学生是否抽烟与每天学习时间长短关系的调查数据，试用 R 语 言对其进行基本统计分析。d2.3=readxlsx(mvexer5.xlsx,sheet=E2.3);d2.3#读取数据
8、1234567891012345678910编号是否抽烟每天学习时间 少于5小时5-10小时5-10小时超过10小时超过10小时少于5小时5-10小时少于5小时超过10小时5-10小时对数据进行简单的统计分析：dim(d2.3);names(d2.3)1 1031编号是否抽烟每天学习时间str(d2.3)data.frame:10 obs. of 3 variables:$ 编号：num 1 2 3 4 5 6 7 8 9 10$是否抽烟 ：chr 是否否是”.$每天学习时间：chr 少于5小时5-10小时5-10小时超过10小时.summary(d2.3)编号是否抽烟每天学习时间Min.1.
9、00Length:10Length:101st Qu.3.25Class:characterClass:characterMedian5.50Mode:characterMode:characterMea n5.503rd Qu.7.75Max.10.00可以看到抽取学生中4 位不抽烟，6 位抽烟，每天学习时间小于5 小时的有3 位，5-10小时的有4 位，超过10小时的有3位，抽烟情况和学习时间分别的分 布比较均匀。2.4试编制进行计量数据频数表分析的R语言函数。ch=function(X)H=hist(X) n=H$breaks2 H$breaks1c=dataframe(组中值=H$mids,频数=H$counts,频率=H$density*n,累计 频率=cumsum(H$de nsi ty*n)cch(d2.2$X)Histogram of X舄InL CILlnaACJUQJnba?10001500200026003000X组中值频数频率累计频率1125010 0.200.202175020 0.400.603225014 0.280.88427506 0.121.00
多元统计分析及R语言建模答案
