预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10
亲,该文档总共13页,到这已经超出免费预览范围,如果喜欢就直接下载吧~
如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
R语言实验二实验3R基础(三)一、实验目的:1・掌握列表、数据框的相关运算;2.掌握R对数据文件的读写操作;3-掌握R的简单编程。二、实验内容:完成教材例题;完成以下练习。练习:要求:①完成练习并粘贴运行截图到文档相应位置(截图方法见下),并将所有自己输入文字的字体颜色设为红色(包括后面的思考及小结),②回答思考题,③简要书写实验小结。④修改本文档名为“本人完整学号姓名1”,其中1表示第1次实验,以后更改为2,3,...。如文件名为“1305543109张立1”,表示学号为1305543109的张立同学的第1次实验,注意文件名中没有空格及任何其它字符。最后连同数据文件、源程序文件等(如果有的话),一起压缩打包发给课代表,压缩包的文件名同上。截图方法:法1调整需要截图的窗至合适的大小,并使该窗为当前激活窗(即该窗在屏幕最前方),按住键盘Alt键(空格键两侧各有一个)不放,再按键盘右上角的截图键(通常印有"印屏幕"或叩rScrn"等字符),即完成截图。再粘贴到word文档的相应位置即可。法2:利用。。俞入法的截屏工具。点击QQ输入法工具条最右边的“扳手”图标,选择其中的“截屏”工具。)L自行完成教材P84页开始的2.6-2.9节中的例题。2.教材在讲解列表(List)时,所举例子的参数是有名参数。这里我们练习创建一个列表,其参数是无名参数,并回答以下问题。⑴运行以下命令创建列表,注意每个元素的默认名称;<-list(12,c(34,56),matrix(1:12,nrow=4),1:15,list(10,11))(2)L[[2]][的输出结果是什么?请先自己写出结果,再运行验证;56⑶用1:10替换L的第四个元素,请写出命令,并运行验证;>L[[4]]v-c(1:10)(4)#L的第五个元素中的11替换为20,请写出命令,并运行验证。>L[[5]][2]<-20运行结果截图3.(习题2.4)生成一个5阶的Hilbert矩阵,H=(山)„,”hu=j.,ji,》1,2,A.n(1)计算Hilbert矩阵H的行列式;求H的逆矩阵;求H的特征值和特征向量。源代码:>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)运行截图:>>n<-5;H<Aarray(0fdim-c(n,n)for(iin1:5)inID]<-1/(i+3-1)0,20.166666八0.142B5710.1250.1111111[,1][山】[,3]【沁][lr)1.ODOOOQO050,3333333--25J0J[2r)05Q0Q00.33333330,2503,2[3,]033333330.2500,2[的】02500.20,166666"0,1423571[5,]020.16666670.142S5710,125>det(H)II]3,749295e-12[,1](,?]〔沁】[,】〔5]25-31050-14630-343-1S926860-1261050-18979360-1176567-1426880-117617920G-B3230-1265G7-8C2441[1,][2,113,)【4】【5J[,1][l,0*767B54A[,2][>3][2,10.4457911[3,10.601C715-0.21421360.04711S1061735630.3215703[4J-0.275913A0.7241021A0.43266733一0r0.2534389-0*42487660.12045330.66735044116692747[5,]0.2090226-0*4439030-0.30957400.233024520506163653-04290134-0*5651934Y55759995一0>solve(H)767191193>eigen(H)[1]-57051e+2.085342e-011.140749e-023D58980e-a43287929e-Ofi4.Svectors(习题2.5)已知有5名学生的数据,如下表所示。用数据框的形式读入数据。学生数据序号姓名性别年龄身高cm体重kg张三李四王五女14男15女1615616515742.049.041.54赵六男1416252.05J女1515945.5解:源代码:>dfv-dataframe(Name=c("张三”,李四",王五”,赵六","丁