R语言实验指导书(二).doc

R语言实验指导书(二)
R语言实验指导书（二）
2016年10月27日
矩阵与数组。
创建一个4*5的数组如图，创建一个索引矩阵如图,"1997/05/02","1997/05/03","1997/05/04","1997/05/05","1997/05/06")
air <- (date,Ozone,,wind,Temp, stringsAsFactors = FALSE)
使用class（）函数查看date函数的类型，并将其转化为data型，格式为月/日/年。
使用subset（）根据Temp列获取air中Temp大于60小于70的数据。
将air中含有缺失值的列去掉。
找出Temp中大于85的值将其设置为缺失值。
创建一个air1包含两个列q1，q2。用cbind函数添加到air中。
使用names函数查看air的列名，并根据列自己创建一个数据框。使用rbind函数添加到air中
实验要求
要求学生会用subset获取子集，学会对缺失值进行一些简单的处理和对一些异常值的查找和修改。
实验六 高级数据管理
实验目的
学会简单的数值和字符处理函数。
学会自己编写一个函数。
实验内容
使用下面代码创建roster数据集。
Student <- c("John Davis", "Angela Williams",
"Bullwinkle Moose", "David Jones",
"Janice Markhammer", "Cheryl Cushing",
"Reuven Ytzrhak", "Greg Knox", "Joel England",
"Mary Rayburn")
Math <- c(502, 600, 412, 358, 495, 512, 410, 625, 573, 522)
Science <- c(95, 99, 80, 82, 75, 85, 80, 95, 89, 86)
English <- c(25, 22, 18, 15, 20, 28, 15, 30, 27, 18)
roster <- (Student, Math, Science, English,
stringsAsFactors=FALSE)
使用length函数查看Student的长度。
计算该班级数学的平均成绩，最高成绩。
将成绩单按照姓和名进行排序，将学生的各科考试成绩组合为单一的成绩衡量指标、基于相对名次（前 20%，下20%，等等）给出从A到F的评分。
使用quantile函数按20%，40%，60%，80%,求分位数。
使用变量重命名的方法将grade列分为A、B、C、D、F几个等级。
使用strsplit 函数将Student列的名字分割，存到name中。
创建一个函数x1，功能为实现返回值为传入参数的第一个值。
使用sapply 函数将name中的firstname提取出来。（“sapply（data，function）”）同理即可提取出lastname。
将lastname和firstname与roster合并，同时去掉roster的第一列。
将成绩单用姓和名进行排序。
实验要求
要求学生学会一些简单的数值和字符处理函数。学会如何自己创建一个函数。和对一些简单问题的处理。
实验七 基本统计分析实验
实验目的
学会使用summary函数和Hmisc包中的describe函数来计算统计量。
使用table函数生成一维、二维、多维列联表。
学会用R实现卡方独立性检验。
学会用R进行相关性的度量。
学会用R进行Pearson、Spearman和Kendall相关。
学会用R进行相关性的显著性检验。
学会用R进行组间差异的非参数检验。
实验内容
描述性统计分析
对R自带的数据集rock（48块石头的形态数据）使用summary函数、Himisc包中的describe函数、。
使用aggregate、doby中的summaryBy对sleep数据集的group列分组获取描述性统计量。
频数表和列联表
加载vcd包中的Arthritis数据集使用table生成简单的频数统计表。
使用table、xtabs对Arthritis生成二维列联表。并使用addmargins为这些表格添加边际和（根据Treatment、Improved）。
使用xtabs，