1、R语言实验三R语言实验三实验3 R基础(三)一、实验目的:1.掌握列表、数据框的相关运算;2.掌握R对数据文件的读写操作;3.掌握R的简单编程。二、实验内容:1.完成教材例题;2.完成以下练习。练习:要求:完成练习并粘贴运行截图到文档相应位置(截图方法见下),并将所有自己输入文字的字体颜色设为红色(包括后面的思考及小结),回答思考题,简要书写实验小结。修改本文档名为“本人完整学号姓名1”,其中1表示第1次实验,以后更改为2,3,.。如文件名为“1305543109张立1”,表示学号为1305543109的张立同学的第1次实验,注意文件名中没有空格及任何其它字符。最后连同数据文件、源程序文件等(
2、如果有的话),一起压缩打包发给课代源代码:n-5;Hfor(i in 1:5)for(j in 1:5)Hi,jHdet(H)solve(H)eigen(H) 运行截图: 1.(习题2.5)已知有5名学生的数据,如下表所示。用数据框的形式读入数据。学生数据序号姓名性别年龄身高cm体重kg1张三女1415642.02李四男1516549.03王五女1615741.54赵六男1416252.05丁一女1515945.5解:源代码:dfdf df write.csv(df, file=“ex2.6.cxv”) write.csv(df, file=“D:/ex2.6.cxv”)运行截图: R-改变工
3、作目录-3.(习题2.7)编写一个R程序(函数)。输入一个整数n,如果n0,则中止运算,并输出一句话:“要求输入一个正整数”;否则,如果n是偶数,则将n除2,并赋给n;否则,将3n+1赋给n。不断循环,直到n=1,才停止计算,并输出一句话:“运算成功”。这个例子是为了检验数论中的一个简单的定理。源代码:Fun-function(n) if(n=0) list(fail=要求输入一个正整数) else repeat if(n=1) break else if(n%2=0)n-n/2 else nlibrary(foreign)三、实验小结(必写,但字数不限)自己先把题算一遍,不要急于运行,算出结果,再运行检查结果是否一致,如果不一致,自己找出错误,重新再算,直到结果一致。熟练课本的例题,掌握知识点,多练题,学会编写题中要求的函数。