矩阵，矩阵的合并,矩阵中取元素，矩阵各行列求和或均值，转置

matrix(data,c(nrow,ncol),byrow=T)  或者

matrix(data,nroe=,ncol=,byrow=T)          #产生矩阵的格式

> y<-matrix(1:30,nrow=5,ncol=6,byrow=FALSE)    #1-30的数据，5行，6列，按行填充
> y
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 1 6 11 16 21 26
[2,] 2 7 12 17 22 27
[3,] 3 8 13 18 23 28
[4,] 4 9 14 19 24 29
[5,] 5 10 15 20 25 30

 

> a<-rbind(c(1,2),c(3,4))    #将两个向量纵向合并成矩阵
> a
[,1] [,2]
[1,] 1 2
[2,] 3 4

> b<-matrix(1:10,c(2,5))
> b
[,1] [,2] [,3] [,4] [,5]
[1,] 1 3 5 7 9
[2,] 2 4 6 8 10

> d<-matrix(11:20,c(2,5))
> d
[,1] [,2] [,3] [,4] [,5]
[1,] 11 13 15 17 19
[2,] 12 14 16 18 20

> f<-rbind(b,d)               #将矩阵纵向（行）合并
> f
[,1] [,2] [,3] [,4] [,5]
[1,] 1 3 5 7 9
[2,] 2 4 6 8 10
[3,] 11 13 15 17 19
[4,] 12 14 16 18 20

 

> g<-cbind(b,d)                  #将矩阵横向合并
> g
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]      
[1,] 1 3 5 7 9 11 13 15 17 19
[2,] 2 4 6 8 10 12 14 16 18 20

 

> h<-cbind(1,a)         #横向合并常量和矩阵
> h
[,1] [,2] [,3]
[1,] 1 1 2
[2,] 1 3 4

 

> h2<-rbind(1,a)         #纵向和并常量和矩阵
> h2
[,1] [,2]
[1,] 1 1
[2,] 1 2
[3,] 3 4

 

矩阵中取元素如下；

x[i,]    #返回矩阵x中的第i行

x[，j]   #返回j列

x[i，j]   #返回第i行第J列

x[i,-j]    #返回第i行，但排除第j列元素

x[-i，j] #

x[c(i1，i2)，c（j1,j2）]    #方括号中使用向量来选择行，列

x[c(i1，i2)，-c（j1,j2）] 

x[c(i1，i2)，c（j1：j2）] 

 x[c(i1，i2)，-c（j1：j2）] 

 

t（x）   #转置

as.vector()    #将矩阵转化为向量

dim() ,nrow(), ncol()    #返回矩阵维度

colSums（）      #对矩阵的各列求和

rowSums（）   #对矩阵的各行求和

colMeans（）  #对矩阵的各列求均值

rowMeans（）  #对矩阵的各行求均值

det（  ）         #计算行列式