R语言数据结构实例入门

R语言的数据结构介绍"##"代表输出内容
		向量
			储存一维数据、其中数据数据类型相同、用C()创建向量。
			例：
			v.number<- c(1,2,3,4,5,6)
			v.char<- c(”tom”,”jack”,”mack”,”anna”)
			v.bool<- c(TRUE,FALSE,FALSE)
			例1(真假问题)：
			if(-1) print("true") #-1为真
			##[1] true
			if(0) print("false") #无输出
			if() print("fasle") #报错，无法比较
			##Error:missing value where TRUE/FALSE needed
			if(NULL) print("false")#报错，无法比较
			##Error:atgument is of length zero
			例2(数据类型转换问题)：
			x<- c(1:10,"jane")
			x
			##[1] "1"    "2"    "3"    "4"    "5"    "6"    "7"    "8"    "9"    "10"  
			[11] "jane"
			例3(数据类型转换问题)：
			x<-c(1:10,"jace")
			class(x)
			##[1] "character"

			y<-c(1:10)
			class(y)
			##[1] "integer"
			数据转换类型次序：NULL->raw->logical->integer->complex->character->list->expression
			例4(下标问题)：
			x<-c(1:10)
			x[0]
			##integer(0)
			x[1]
			##[1] 1
			x[2:4]
			##[1] 2 3 4
			x[-1]
			##[1]  2  3  4  5  6  7  8  9 10
			x[11]
			##[1] NA
			变量命名问题：如x,x.1,"1",.x,._等合法，.1不合法
		矩阵
			语法：matrix（data=NA,nrow=1,ncol=1,byrow=FALSE,dimnames=NULL）
			例（创建矩阵）：
			rowName<-paste("row",1:3,sep='') 
			colName<-paste("col",1:4,sep='') 
			(ml<-matrix(data=1:12,nrow=3,byrow=TRUE,dimnames=list(rowName,colName)))
			##     col1 col2 col3 col4
			##row1    1    2    3    4
			##row2    5    6    7    8
			##row3    9   10   11   12
			(m2<-matrix(data=1:12,nrow=3,byrow=FALSE,dimnames=list(rowName,colName)))
			##     col1 col2 col3 col4
			##row1    1    4    7   10
			##row2    2    5    8   11
			##row3    3    6    9   12
			ml[1,2]
			##[1] 2
			ml[1,2:4]
			##col2 col3 col4 
			##   2    3    4 
			ml[,1]
			##row1 row2 row3 
			##   1    5    9
			ml[3]
			##[1] 9



		数组
			例（创建数组）：
			> dim1name<-paste("A",1:3,sep='')
			> dim2name<-paste("B",1:4,sep='')
			> dim3name<-paste("C",1:2,sep='')
			> (a<-array(1:24,dim=c(3,4,2),dimnames=list(dim1name,dim2name,dim3name)))
			, , C1

			   B1 B2 B3 B4
			A1  1  4  7 10
			A2  2  5  8 11
			A3  3  6  9 12

			, , C2

			   B1 B2 B3 B4
			A1 13 16 19 22
			A2 14 17 20 23
			A3 15 18 21 24

			> a[1,1,1]
			[1] 1
			> a[1,2,]
			C1 C2 
			 4 16 
			> a[1,,]
			   C1 C2
			B1  1 13
			B2  4 16
			B3  7 19
			B4 10 22
			> a[,1,]
			   C1 C2
			A1  1 13
			A2  2 14
			A3  3 15


		因子
			语法：factor（x=character(),levels,labels=levels,exclude=NA,ordered=is.ordered(x),nmax=NA）
			      levels(x)
			例：
			> chr<-c("f","e","d","c","b","a")
			> f<-factor(chr)
			> class(f)
			[1] "factor"
			> storage.mode(f)
			[1] "integer"
			> as.numeric(f)
			[1] 6 5 4 3 2 1
			> levels(f)
			[1] "a" "b" "c" "d" "e" "f"
		列表
			语法：list（x1,x2,x3,....）
			例（创建列表）：
			i<-1
			v<-c(1:10)
			ch<-c("ja","ju")
			a<-array(1:12,c(2,3,4))
			li<-list(i=i,v=v,ch=ch,a=a)
			
			> li[1]
			$i
			[1] 1

			> li[[1]] [1]
			[1] 1
			> li["a"]
			$a
			, , 1

			     [,1] [,2] [,3]
			[1,]    1    3    5
			[2,]    2    4    6

			, , 2

			     [,1] [,2] [,3]
			[1,]    7    9   11
			[2,]    8   10   12

			, , 3

			     [,1] [,2] [,3]
			[1,]    1    3    5
			[2,]    2    4    6

			, , 4

			     [,1] [,2] [,3]
			[1,]    7    9   11
			[2,]    8   10   12


			> li$a
			, , 1

			     [,1] [,2] [,3]
			[1,]    1    3    5
			[2,]    2    4    6

			, , 2

			     [,1] [,2] [,3]
			[1,]    7    9   11
			[2,]    8   10   12

			, , 3

			     [,1] [,2] [,3]
			[1,]    1    3    5
			[2,]    2    4    6

			, , 4

			     [,1] [,2] [,3]
			[1,]    7    9   11
			[2,]    8   10   12

			> li$c
			[1] "ja" "ju"
			> li["c"]
			$<NA>
			NULL
			例（list嵌套）：
			> li<-list(list(list(x=1,y=2)))
			> li
			[[1]]
			[[1]][[1]]
			[[1]][[1]]$x
			[1] 1

			[[1]][[1]]$y
			[1] 2



			> class(li[[1]])
			[1] "list"
			> class(li[[1]][[1]])
			[1] "list"
			> class(li[[1]][[1]][1])
			[1] "list"
			> class(li[[1]][[1]][[1]])
			[1] "numeric"

		数据框
			语法：data.frame(name=name,...,height=height,row.names = NULL,check.rows=FALSE,check.names=TRUE,stringsAsFactors=default.stringAsFactors())
			创建数据框：
			> name<- c("cc","bb","b","a")
			> age<-c(11,12,13,14)
			> gender<-c("F","M","M","M")
			> height<-c(90,100,98,89)
			> student<-data.frame(name=name,age=age,gender=gender,height=height,row.names = name)
			> student
			   name age gender height
			cc   cc  11      F     90
			bb   bb  12      M    100
			b     b  13      M     98
			a     a  14      M     89
			> student[1,]
			   name age gender height
			cc   cc  11      F     90
			> student[1,3]
			[1] F
			Levels: F M
			> student$name
			[1] cc bb b  a 
			Levels: a b bb cc




	数据的导入与导出
		键盘 导入，从纯文本中读取数据，其他文件中读取数据，写文件，使用windows的粘贴板功能，保存输出，保存为R的特有的格式。
	总结与补充
		总结，补充。