>a<-c(a,b,c)   #combine,将c()函数的参数联合起来成一个向量

>a<-seq(1,3) #sequence,以一定的间隔形成一个向量（等比数列），默认项差为1.
>a
#1,2,3
>a<-1:3
>a
#1,2,3   

>a<-rep(1,100) #repeat,第一个参数为重复的量，第二个参数为重复次数.

>a<letters[1:5]
>names(a)<-LETTERS[1:5]  #属性的个数必须和元素个数一致
>a[1]
#[1] "a"
>a["A"]
# A
a

> a <- list(num = 1:3, alphabet = letters[1:3])
>names(a)
#[1] "num" "alphabet"

>a$num #通过$访问元素
[1]1 2 3
>a[[1]]  #通过[[]]访问元素
[1]1 2 3 

>a[1]  #通过[]获得子list
$num
[1] 1 2 3 

>a<-11:22
>m<-matrix(a,ncol=3,nrow=4)#ncol,列数；nrow，行数
>m
##      [,1] [,2] [,3]
## [1,]    11    15   1 9
## [2,]    12    16   20
## [3,]    13    17   21
## [4,]    14    18   22

>m[7] #使用访问atomic vector的方法访问matrix
[1] 17
>m[3,2]#使用访问matrix的方法访问
[1] 17
>m[,2]#访问第二列
[1] 15 16 17 18
>m[,2,drop=FALSE]#访问第二列，但仍保持matrix形式
   [,1]
[1,] 15
[2,] 16
[3,] 17
[4,] 18

####矩阵的方法和属性####
>dim(m) #矩阵的大小
[1] 4 3
>ncol(m)#矩阵的列数
[1] 3
>nrow(m)#矩阵的行数
[1] 4

>rownames(m)<-letters[1:4]#增加row的名称
>colnames(m)<-Letters[1:3]#增加column的名称
>m
##    A  B  C
## a  1  2  3
## b  4  5  6
## c  7  8  9
## d 10 11 12

>d<-matrix(1:12,ncol=3,nrow=4)
>row<-rbind(d,m) #rbind=row bind 增加row，column保持不变
>col<-cbind(d,m) #cbind=column bind 增加column，row保持不变

>t(d) #t()函数(transpose),转置。

> df <- data.frame(A = 1:3, B = letters[1:3]) #接受的参数是atomic vector
> df
##   A B
## 1 1 a
## 2 2 b
## 3 3 c

>str(df)
## ‘data.frame‘:    3 obs. of  2 variables:
##  $ A: int  1 2 3
##  $ B: Factor w/ 3 levels "a","b","c": 1 2 3

>df$A   #访问元素,返回一个atomic vector.
##[1] 1 2 3
>is.atomic(df$A)
[1] TRUE

>df[["B"]]
## [1] a b c
## Levels: a b c
>is.atomic([["B"]])
[1] TRUE

>df[1,] #和matrix一样的方法
##   A B
 1     1  a

>cbind(df,C=0)
##   A B C
## 1 1 a 0
## 2 2 b 0
## 3 3 c 0