NurfürdenpersönlichenfürStudien,Forschung,=y<-sin(10*pi)*exp(-+4^2)+log(23)/log(4)2x=sin(223/3),y=x^2,z=y*10;求x+2y-5zx<-sin(223/3);y<-x^2;x+2*y-5*z3建立起始值=3,增量值=,终止值=44的一维数组xx<-seq(,by=)4建立等差一维数组x:首项为0,末项为,项数为15x<-seq(0,pi,length=15)5将100,200,200,200,400,600,600,600,800输入R中,保存到numeric变量中numeric<-c(100,200,200,200,400,600,600,600,800),并用class()确认。<-(numeric),形式为2,4,6,8,...,48,50并名为为vector1vector1<-seq(from=2,to=50,by=2)9选取vector1中的第20个元素vector1[20]10选取vector1中的第10,15,20个元素vector1[c(10,15,20)]11选取vector1中的第10到20个元素vector[10:20]12选取vector1中值大于40的元素vector1[vector1>40]13创建向量1234512345123451234512345rep(1:5,5)14使用rep()创建向量0000011111222223333344444rep(0:4,rep(5,5))15用函数rep()构造一个向量x,它由3个3,4个2,5个1构成x=c(rep(3,3),rep(2,4),rep(1,5))统计软件实验2每题需注意1命令代码2结果或图形3自己的错误1计算行列式的值A=det(matrix(c(3,4,7,2,2,8,3,6,1),nrow=3))2矩阵,矩阵;求出AxB及A与B中对应元素之间的乘积A=matrix(c(3,4,7,2,2,8,3,6,1),nrow=3);B=matrix(rep(1:3,3),nrow=3);A%*%B;A*B3由1,2,...,16构成两个方阵,其中矩阵A按列输入,矩阵B按行输入,并计算C=A+B,D=ABA=matrix(1:16,nrow=4);B=matrix(1:16,nrow=4,byrow=T);C=A+B;D=A%*%B4先复制附录数据至文本文档,然后读取数据至文件datadata<-("D:/",header=T)5比值的计算weight和height的平方的比值存入bmi变量bmi<-weight/height^2;detach(data)6创建对象x,其值为1:10,;删除x,然后再读入该文件并赋值给x,并保证x是numeri
R语言练习题 来自淘豆网m.daumloan.com转载请标明出处.