R语言基本数据结构PPT学习教案

1、会计学1R语言基本数据结构语言基本数据结构NameIDTeam.NumDutyGrade1Grade2Grade3Grade4Grade5Wang N2007091 captainNANANANANATang MJ2007201 memberNANANANANA作业1:按下面表格的形式生成本组信息的数据框,并提交原程序.Name为字符型、ID为数字型、Team.Num为分组因子、Duty为分组因子、Grade1-5为数值型第1页/共54页Base: is.thingsBase: recursionGraphics: HersheyGraphics: JapaneseGraphics: grap

2、hicsGraphics: imageGraphics: perspGraphics: plotmathLattice: intervalsLattice: labelsLattice: latticeLattice: panelStats: glm.vrStats: lm.glmStats: nlmStats: smooth作业2：利用sample函数设计算法，把下面16个demo公平地分配给15个组，并提交原程序第2页/共54页对象命名：1、对象的名字必须是以一个字母开头(AZ 或az)，中间可以包含字母，数字(09)，点(.)及下划线(_)；2、R对对象的名字区分大小写；3、避免用R的各

3、种包中的既有对象名来对对象命名：例如，if、for、pi等3、可以通过输入一个对象的名字来显示其内容，例如，一个名为n的对象，其内容是数值10： n 1 10第3页/共54页第4页/共54页第5页/共54页数值型Numeric 如 100, 0, -4.335字符型Character 如“China”逻辑型Logical 如TRUE, FALSE因子型Factor 表示不同类别复数型Complex 如：2 + 3i对象的类型：mode(object)对象的长度：length(object); fruit names(fruit) mode(fruit)1 numeric length(frui

4、t)1 4第6页/共54页第7页/共54页第8页/共54页第9页/共54页第10页/共54页第11页/共54页3、分布函数第12页/共54页第13页/共54页第14页/共54页第15页/共54页第16页/共54页第17页/共54页 z z 1 1.0464457+1.4921546i -0.0857576+0.6500323i -0.4077956+0.7363948i 4 1.2992962+1.0821262i -1.3359859-2.2430534i 1.0756972+1.4531898i 7 1.1084957+0.6604677i 1.2716703+0.4288688i 0.2

5、792403+0.4181003i10 -1.0414731-2.2300299i zz zz.shift zz.shift1 -0.1-0.9i -0.2-0.8i -0.3-0.7i -0.4-0.6i -0.1-0.5i -0.2-0.4i -0.3-0.3i8 -0.4-0.2i -0.1-0.1i第18页/共54页第19页/共54页第20页/共54页FirstArray FirstArray 1 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 dim(FirstArray)FirstArray #数组的填充

6、规则:越靠前的下标变化越快; #越靠 后的下标变化越慢, , 1 ,1 ,2 ,3 ,41, 1 4 7 102, 2 5 8 113, 3 6 9 12, , 2 ,1 ,2 ,3 ,41, 13 16 19 222, 14 17 20 233, 15 18 21 24#等价于 FirstArrayPrices Prices 64M 128M 256Mvender1 20 22 76vender2 24 56 87 Prices,c(“64M”,“256M”) #通过维名访问数组 64M 256Mvender1 20 76vender2 24 87第22页/共54页第23页/共54页 a1

7、a2 a1 ,1 ,2 ,31, 1 5 92, 2 6 103, 3 7 114, 4 8 12 a2 ,1 ,2 ,31, 1 4 72, 2 5 83, 3 6 9 a1+a2错误于a1 + a2 : 非整合陈列 a2 a2 ,1 ,2 ,31, 1 5 92, 2 6 13, 3 7 24, 4 8 3 a1+a2 ,1 ,2 ,31, 2 10 182, 4 12 113, 6 14 134, 8 16 15 a1*a2 ,1 ,2 ,31, 1 25 812, 4 36 103, 9 49 224, 16 64 36不同dim属性相同dim属性不同dim属性相同dim属性第24页/

8、共54页 a3 a3 ,1 ,2 ,31, 1 2 3 a2+a3错误于a2 + a3 : 非整合陈列一维数组并不等效为向量 a4 a41 1 2 3 a4+a2 ,1 ,2 ,31, 2 7 122, 4 9 23, 6 8 44, 5 10 6向量与数组运算 a5 a4+a51 2 4 6 5 7 9 8警告信息：In a4 + a5 : 长的对象长度不是短的对象长度的整倍数不同长度的向量运算 a6 a6+a2错误: dims product 12与对象长度13不匹配此外: 警告信息：In a6 + a2 : 长的对象长度不是短的对象长度的整倍数 a7 a7+a2错误: dims prod

9、uct 12与对象长度24不匹配一维数组并不等效为向量不同长度的向量运算第25页/共54页 A B A ,1 ,21, 1 32, 2 4 B ,1 ,2 ,3 ,41, 1 4 7 102, 2 5 8 113, 3 6 9 12 B%o%A, , 1, 1 ,1 ,2 ,3 ,41, 1 4 7 102, 2 5 8 113, 3 6 9 12, , 2, 1 ,1 ,2 ,3 ,41, 2 8 14 202, 4 10 16 223, 6 12 18 24, , 1, 2 ,1 ,2 ,3 ,41, 3 12 21 302, 6 15 24 333, 9 18 27 36, , 2, 2

10、 ,1 ,2 ,3 ,41, 4 16 28 402, 8 20 32 443, 12 24 36 48 AB x x ,1 ,2 ,31, 1 3 52, 2 4 6 xt xt ,1 ,21, 1 22, 3 43, 5 6第27页/共54页 x x, , 1 ,1 ,2 ,31, 1 3 52, 2 4 6, , 2 ,1 ,2 ,31, 7 9 112, 8 10 12, , 3 ,1 ,2 ,31, 13 15 172, 14 16 18, , 4 ,1 ,2 ,31, 19 21 232, 20 22 24 xt xt, , 1 ,1 ,21, 1 22, 3 43, 5 6, ,

11、 2 ,1 ,21, 7 82, 9 103, 11 12, , 3 ,1 ,21, 13 142, 15 163, 17 18, , 4 ,1 ,21, 19 202, 21 223, 23 24第28页/共54页# nrow定义行数，ncol定义列数，dimnames定义行和列的名称，byrow定义矩阵的填充顺序，为T时按行填充，为F时按列填充mdat mdat C.1 C.2 C.3row1 1 2 3row2 11 12 13 t(mdat) row1 row2C.1 1 11C.2 2 12C.3 3 13 xt xt row1 row2C.1 1 11C.2 2 12C.3 3 1

12、3转置转置 t(mdat) row1 row2C.1 1 11C.2 2 12C.3 3 13 xt xt row1 row2C.1 1 11C.2 2 12C.3 3 13转置转置第29页/共54页 a1 a2 a1 ,1 ,2 ,31, 1 3 52, 2 4 6 a2 ,1 ,2 ,31, 1 4 72, 2 5 83, 3 6 9 a1%*%a2 ,1 ,2 ,31, 22 49 762, 28 64 100 a1%*%a1错误于a1 %*% a1 : 非整合参数 a2%*%a1错误于a2 %*% a1 : 非整合参数两个矩阵内积第30页/共54页 Coefficient Result

13、 solve(Coefficient,Result) #sovle()返回线性方程组行列式结果1 2 -3 #a=2,b=-3求解线性方程组：3a-2b=122a+b=1 solve(Coefficient) #求矩阵Coefficient的逆 ,1 ,21, 0.1428571 0.28571432, -0.2857143 0.4285714第31页/共54页矩阵计算函数矩阵计算函数练习2.1熟练掌握矩阵计算的有关函数第32页/共54页第33页/共54页 a1 a2 a1 ,1 ,2 ,31, 1 3 52, 2 4 6 a2 ,1 ,2 ,31, 1 4 72, 2 5 83, 3 6 9

14、 rbind(a1,a2) ,1 ,2 ,31, 1 3 52, 2 4 63, 1 4 74, 2 5 85, 3 6 9 cbind(a1,a2)错误于cbind(a1, a2) : 矩阵的行数必需相符(见arg2) t(a1) ,1 ,21, 1 22, 3 43, 5 6 a1 cbind(a1,a2) ,1 ,2 ,3 ,4 ,51, 1 2 1 4 72, 3 4 2 5 83, 5 6 3 6 9第34页/共54页第35页/共54页 X names(X) Xa b c d e f g h i 1 2 3 4 5 6 7 8 9 X6f 6 X2:6b c d e f 2 3 4

15、5 6 X-3a b d e f g h i 1 2 4 5 6 7 8 9 X-(5:9)a b c d 1 2 3 4 X-c(5,9,2)a c d f g h 1 3 4 6 7 8 XX5f g h i 6 7 8 9 XX5 & X Xc(c,g,d)c g d 3 7 4 XX %in% letters5:13named integer(0) XX %in% 5:13e f g h i 5 6 7 8 9 sstr sstrsstr %in% c(letters,LETTERS)1 c B c a例子第36页/共54页数组具有类似的数据分割与选取方法数组具有类似的数据分割与选取方

16、法矩阵索引练习2.2 熟练掌握数据分割与选取的方法第37页/共54页 X X D E F Ga 1 2 3 4b 5 6 7 8c 9 10 11 12 X2,31 7 X2,D E F G 5 6 7 8 X,4 a b c 4 8 12 X,c(1,3) D Fa 1 3b 5 7c 9 11 Xa,D E F G 1 2 3 4 第38页/共54页第39页/共54页 FamilyInfo FamilyInfo$hostname1 joe$wife1 rose$no.children1 3$child.ages1 1 3 7 FamilyInfo$wife #通过元素的名字来访问1 ros

17、e“ FamilyInfo3 #通过元素的编号来访问$no.children1 3 FamilyInfo31 3例子第40页/共54页 length(FamilyInfo)1 4 FamilyInfo5 FamilyInfo$hostname1 joe$wife1 rose$no.children1 3$child.ages1 1 3 751 10th F, HongXing Building, No.100, JainYe Road第41页/共54页 FamilyBirthday c(FamilyInfo,FamilyBirthday)-Family #函数c()可以连接数据列表 Famil

18、y$hostname1 joe$wife1 rose$no.children1 3$child.ages1 1 3 751 10th F, HongXing Building, No.100, JainYe Road$hostbirthday1 1979/10/08$wifebirthday1 1973/07/09第42页/共54页 数据框（data frame）是一个属于data.frame 类的列表。不过，对于可能属于数据框的列表对象有下面一些限制条件，1、分量必须是向量(数值, 字符, 逻辑)，因子，数值矩阵，列表或者其他数据框;2、矩阵，列表和数据框为新的数据框提供了尽可能多的变量，因

19、为它们各自拥有列，元素或者变量;3、数值向量，逻辑值，因子保持原有格式，而字符向量会被强制转换成因子并且它的水平就是向量中出现的独立值;4、在数据框中以变量形式出现的向量结构必须长度一致，矩阵结构必须有一样的行数. 数据框常常会被看作是一个由不同模式和属性的列构成的矩阵。它能以矩阵形式出现，行列可以通过矩阵的索引习惯访问。十、数据框第43页/共54页 L3 d d x y fac1 1 1 C2 1 2 A3 1 3 B4 1 4 C5 1 5 A6 1 6 B7 1 7 B8 1 8 B9 1 9 B10 1 10 A d1 x1 12 13 14 15 16 17 18 19 110 1

20、d1 1 1 1 1 1 1 1 1 1 1 1 mode(d1)1 list mode(d1)1 numeric length(d1)1 1 length(d1)1 10 d231 3第44页/共54页d d x y fac HT1 1 1 B T2 1 2 A H3 1 3 B H4 1 4 A T5 1 5 C T6 1 6 A T7 1 7 B H8 1 8 C T9 1 9 C H10 1 10 A T rbind(class=sapply(d, class), mode=sapply(d, mode) x y fac HT class numeric numeric factor factor mode numeric numeric numeric numeric第45页/共54页 d d x y fac HT1 1 1 A H2 1 2 A T3 1 3 C T4 1 4 A T5 1 5 B H6 1 6 C H7 1 7 C T8 1 8 A H9 1 9 A T10 1 10 C H rbind(class=sapply(d, class), mode=sapply(d, mode) x y fac HT