R语言习题.docx

一组学生参加了数学、科学和英语考试。为了给所有的学生确定一个单一的成绩衡量指标，需要将这些科目的成绩组合起来。另外，还想将前20%的学生评定为A，接下来20%的学生评定为B，以此类推。最后，希望按字母顺序对学生排序。 Excel中的数据表 StuIdStuNameMathScienceEnglish1John Davis50295252Angela Williams46567123Bull Jones62178224Cheryl Cushing57566185Reuven Ytzrhak45496156Joel Knox63489307Mary Rayburn57678378Greg England42156129Brad Tmac599682210Tracy Mcgrady66610038 1：输入数据——R语言导入xlsx install.packages(xlsx) library(xlsx) workbook-D:/R /StuScore.xlsx StuScore-read.xlsx(workbook,1) StuScore 2：数据预处理——将变量进行标准化 options(digits=2)#限定为2位小数 afterscale-scale(StuScore[,3:5]) afterscale Math Science English [1,] -0.58 1.040 0.20 [2,] -1.02 -0.815 -1.17 [3,] 0.82 -0.086 -0.12 [4,] 0.28 -0.881 -0.54 [5,] -1.15 1.106 -0.86 [6,] 0.98 0.643 0.73 [7,] 0.29 -0.086 1.47 [8,] -1.54 -1.544 -1.17 [9,] 0.56 -0.749 -0.12 [10,] 1.35 1.372 1.57 attr(,scaled:center) Math Science English 551 79 23 attr(,scaled:scale) Math Science English 84.7 15.1 9.5 3:通过函数mean()来计算各行的均值以及获得综合得分，并使用cbind()将其添加到花名册中 #3在afterscale中计算标准差均值，并将其添加到StuScore score-apply(afterscale,1,mean)#1表示行，mean表示均值函数 StuScore-cbind(StuScore,score) StuScore StuId StuName Math Science English score 1 1 John Davis 502 95 25 0.22 2 2 Angela Williams 465 67 12 -1.00 3 3 Bull Jones 621 78 22 0.21 4 4 Cheryl Cushing 575 66 18 -0.38 5 5 Reuven Ytzrhak 454 96 15 -0.30 6 6 Joel Knox 634 89 30 0.78 7 7 Mary Rayburn 576 78 37 0.56 8 8 Greg England 421 56 12 -1.42 9 9 Brad Tmac 599 68 22 -0.10 10 10 Tracy Mcgrady 666 100 38 1.43 4:函数quantile()给出学生综合得分的百分位数 quantile(x,probs):求分位数，其中x为待求分位数的数值型向量，probs为一个由[0,1]之间的概率值组成的数值向量 afterquantile-quantile(score,c(.8,.6,.4,.2)) afterquantile 80% 60%