1、实验 2 R 基础（二）一、实验目的：1. 掌握数字与向量的运算；2. 掌握对象及其模式与属性；3. 掌握因子变量；4. 掌握多维数组和矩阵的使用。二、实验内容：1. 完成教材例题；2. 完成以下练习。练习：要求：完成练习并粘贴运行截图到文档相应位置( 截图方法见下) ，并将所有自己输入文字的字体颜色设为红色 （包括后面的思考及小结），回答思考题，简要书写实验小结。修改本文档名为 “本人完整学号姓名1”，其中 1 表示第 1 次实验， 以后更改为2,3,.。如文件名为 “ 09 张立 1”，表示学号为09 的张立同学的第1 次实验， 注意文件名中没有空格及任何其它字符。最后连同数据文件、源程序
2、文件等（如果有的话），一起压缩打包发给课代表，压缩包的文件名同上。截图方法：法 1：调整需要截图的窗口至合适的大小，并使该窗口为当前激活窗口（即该窗口在屏幕最前方），按住键盘 Alt 键（空格键两侧各有一个）不放，再按键盘右上角的截图键（通常印有“印屏幕”或“Pr Scrn ”等字符），即完成截图。再粘贴到word 文档的相应位置即可。法 2：利用 QQ输入法的截屏工具。点击QQ输入法工具条最右边的“扳手”图标，选择其中的“截屏”工具。 ）1. 自行完成教材 P58 页 2.2-2.5 节中的例题。2. （习题 2.1）建立一个 R 文件，在文件中输入变量x = (1 ，2，3)T， y =
3、(4 ，5，6)T，并作以下运算(1)计算 z = 2x + y + e，其中 e = (1 ， 1， 1) T；(2)计算 x 与 y 的内积；(3)计算 x 与 y 的外积。解：源代码：（1） x-c(1,2,3)y-c(4,5,6)e-c(1,1,1)z=2*x+y+ez1=crossprod(x,y)#z1 为 x 与 y 的内积或者 x%*%yz2=tcrossprod(x,y)#z2 为 x 与 y 的外积或者 x%o%yz;z1;z2(2) x-c(1,2,3) y-c(4,5,6) e-c(1,1,1)z=2*x+y+ez1= x%*%yz2=x%o%yz;z1;z2运行截 ：
4、3.（ 2.2）将 1， 2， 20 构成两个4 5 的矩 ，其中矩 矩 B 是按行 入，并作如下运算A 是按列 入，(1) C = A + B； (相 的数相加 )(2) D = AB T；(3) E = ( eij ) 45，其中 eij = aij bij ；（相 的数相乘 )(4) F 是由 A 的前 3 行和前 3 列构成的矩 ；(5)G 是由矩 B 的各列构成的矩 ，但不含B 的第 3 列。解：源代 ：A-matrix(1:20,c(4,5);A#A-matrix(1:20,nrow=4,byrow=F);A/A-matrix(1:20,nrow=4);A#A-matrix(1:2
5、0,ncol=5);A#A-matrix(1:20,ncol=5,byrow=F);AB-matrix(1:20,nrow=4,byrow=TRUE);BC=A+B;CD-A%*%t(B);DE=A*B;EF-A1:3,1:3;FG-B,-3;G运行截 ：D:第一个数175=1*1+5*2+9*3+13*4+17*5400=1*6+5*7+9*8+13*9+17*10 似 .4.（ 2.3）构造一个向量x，向量是由5 个 1， 3 个 2， 4 个 3 和 2 个 4 构成，注意用到rep()函数。解：源代码：x-c(rep(1,times=5),rep(2,times=3),rep(3,ti
6、mes=4),rep(4,times=2); x x-c(rep(1,5),rep(2,3),rep(3,4),rep(4,2);x 运行截图：思考：（以下题目请先进行笔算后，再在R 中运算核对）1. c(1,4)*c(2,3) 的输出结果是什么？1 2 122. matrix(1:2,ncol=2,nrow=2) 的输出结果是什么？ （重复） ,1 ,21,112,223. vec- c(2,4,6,8,10); vec2; vec-2 的输出结果是什么？ （找到相对应下标的数，负数表示去掉）1 41268104. 测量得到了 5 位男士的体重和身高的数据如下：体重 (kg) ： 60, 7
7、5, 65, 68, 70身高 (cm) ： 170, 180, 165, 172, 178分别存储在向量weight 和 height数据，请写出相应的R 代码。中。若想得到那些身高超过170cm的男士的体重weight-c(60, 75, 65, 68, 70)height170运行截图：5. 下面这一命令的输出结果是什么？Mat-matrix(1:12,nrow=4,byrow=TRUE); Mat3,;Mat2,2:3 1 7 8 91 5 66. apply() 函数与 tapply() 函数有什么区别？apply() 是针对数组其一维（或若干维）进行某种运算；tapply() 是针对向量中的数据进行分组处理，而非对整体数据进行处理。三、实验小结（必写，但字数不限）首先需熟悉数字、向量、因子变量和多维数组和矩阵相对应的运算函数，理解和熟记相对应的函数， 一道题中的源代码可能某部分有多种写法，选择简单适合的源代码，学会举一反三，最后要掌握相似函数的区别。
