R语言实验三.docx
《R语言实验三.docx》由会员分享，可在线阅读，更多相关《R语言实验三.docx（7页珍藏版）》请在冰豆网上搜索。
R语言实验三
R语言实验三
实验3R基础（三）
一、实验目的：
1.掌握列表、数据框的相关运算；
2.掌握R对数据文件的读写操作；
3.掌握R的简单编程。
二、实验内容：
1.完成教材例题；
2.完成以下练习。
练习：
要求：
①完成练习并粘贴运行截图到文档相应位置（截图方法见下），并将所有自己输入文字的字体颜色设为红色（包括后面的思考及小结），②回答思考题，③简要书写实验小结。
④修改本文档名为“本人完整学号姓名1”，其中1表示第1次实验，以后更改为2,3,...。
如文件名为“1305543109张立1”，表示学号为1305543109的张立同学的第1次实验，注意文件名中没有空格及任何其它字符。
最后连同数据文件、源程序文件等（如果有的话），一起压缩打包发给课代
源代码：
>n<-5;H<-array（0,dim=c（n,n））
>for（iin1:
5）{for（jin1:
5）{
H[i,j]<-1/（i+j-1）
}
}
>H
>det（H）
>solve（H）
>eigen（H）
运行截图：
1.（习题2.5）已知有5名学生的数据，如下表所示。
用数据框的形式读入数据。
学生数据
序号
姓名
性别
年龄
身高cm
体重kg
1
张三
女
14
156
42.0
2
李四
男
15
165
49.0
3
王五
女
16
157
41.5
4
赵六
男
14
162
52.0
5
丁一
女
15
159
45.5
解：
源代码：
>df<-data.frame（
Name=c（"张三","李四","王五","赵六","丁一"）,
Sex=c（"女","男","女","男","女"）,
Age=c（14,15,16,14,15）,
Height=c（156,165,157,162,159）,
Weight=c（42.0,49.0,41.5,52.0,45.5））;df
运行截图：
2.（习题2.6）将上题中的数据表的中数据写成一个纯文本文件，用函数read.table（）读该文件，然后再用函数write.csv（）写成一个Excel能打开的文件，并用Excel打开。
步骤：
（1）复制上表数据到记事本，并以ex2.6.txt为文件名保存在合适的目录中；
（2）在read.tabel（）中利用file.choose（），打开对话框来读取此文件；
（3）用函数write.csv（）将此文件以ex2.6.cxv为文件名保存。
（4）找到ex2.6.cxv，并打开它验证。
文件默认存在什么地方？
如何找到此文件？
如果想把此文件存放在D盘根目录下，如何修改代码？
源代码：
>df<-read.table（file.choose（）,header=T）
>df
>write.csv（df,file=“ex2.6.cxv”）
>write.csv（df,file=“D:
/ex2.6.cxv”）
运行截图：
R->改变工作目录->
3.（习题2.7）编写一个R程序（函数）。
输入一个整数n，如果n≤0，则中止运算，并输出一句话：
“要求输入一个正整数”；否则，如果n是偶数，则将n除2，并赋给n；否则，将3n+1赋给n。
不断循环，直到n=1，才停止计算，并输出一句话：
“运算成功”。
这个例子是为了检验数论中的一个简单的定理。
源代码：
Fun<-function（n）{
if（n<=0）
list（fail="要求输入一个正整数"）
else{
repeat{
if（n==1）break
elseif（n%%2==0）{n<-n/2}
else
n<-3*n+1
}
list（"运算成功"）
}
}
运行截图：
思考：
1.列表元素除了可以用“列表名[[下标]]”、“列表名[["元素名"]]”这两种方式来引用外，还有哪一种方式？
列表$元素名
2.列表与数据框有什么异同点？
异：
1）列表元素的类型可以任意类型，不同元素不必相同的类型，其中的元素经常是向量和列表本身，元素本身允许是其他类型，长度不要求相同；
2）数据框通常是矩阵形式结构，数据框每一列是一个变量，每一行是一个观测，各列表的成员必须是向量、因子、数值型矩阵、列表或其他数据框，数据框的变量必须要相同的长度（行数）。
同：
数据框可以用data.frame（）函数生成，其用法与列表list（）函数相同
3.对于列表、数据框的编辑，edit（）函数与fix（）函数有什么不同？
edit（）函数进行编辑、修改后的数据并没有保存在原列表或数据框，而是存在新的列表或数据，而fix（）函数可以将编辑、修改后的数据保存原列表和数据框中。
4.当R读入其它格式的数据文件（如SPSS的数据）时，需要先输入一个什么样的命令？
>library（foreign）
三、实验小结（必写，但字数不限）
自己先把题算一遍，不要急于运行，算出结果，再运行检查结果是否一致，如果不一致，自己找出错误，重新再算，直到结果一致。
熟练课本的例题，掌握知识点，多练题，学会编写题中要求的函数。
升级会员 