关于矩阵分行列的一些简单操作。

1.分成7行3列。。

>tmp_matrix<-matrix(c(1,3,9,8,9,80,1,4,2,7,88,1,22,21,31,2,44,9,10,9,10),c(7,3))

> tmp_matrix
     [,1] [,2] [,3]
[1,]    1    4   31
[2,]    3    2    2
[3,]    9    7   44
[4,]    8   88    9
[5,]    9    1   10
[6,]   80   22    9

[7,]    1   21   10

2.分成三行，七列

>tmp_matrix<-matrix(c(1,3,9,8,9,80,1,4,2,7,88,1,22,21,31,2,44,9,10,9,10),c(3,7))
>  tmp_matrix
     [,1] [,2] [,3] [,4] [,5] [,6] [,7]
[1,]    1    8    1    7   22    2   10
[2,]    3    9    4   88   21   44    9
[3,]    9   80    2    1   31    9   10

3.用append函数连接

> x=c(1,3,9,8,9,80,1,4,2,7,88,1,22,21,31,2,44,9,10,9,10)
> y=c(4,7,5,8,2,80,7,8,9,2,66,8,5,2,52,7,4,98,78,3,7)

> z=append(x,y)
> z
 [1]  1  3  9  8  9 80  1  4  2  7 88  1 22 21 31  2 44  9 10  9 10  4  7  5  8  2 80  7  8  9  2 66  8  5  2 52  7  4 98
[40] 78  3  7

> w=matrix(append(x,y),c(21,2))      ###讲连接后的数组变为2行，2列的矩阵
> 
> w
      [,1] [,2]
 [1,]    1    4
 [2,]    3    7
 [3,]    9    5
 [4,]    8    8
 [5,]    9    2
 [6,]   80   80
 [7,]    1    7
 [8,]    4    8
 [9,]    2    9
[10,]    7    2
[11,]   88   66
[12,]    1    8
[13,]   22    5
[14,]   21    2
[15,]   31   52
[16,]    2    7
[17,]   44    4
[18,]    9   98
[19,]   10   78
[20,]    9    3
[21,]   10    7

> m=matrix(append(x,y),c(7,6))
> m
     [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1    4   31    4    8   52
[2,]    3    2    2    7    9    7
[3,]    9    7   44    5    2    4
[4,]    8   88    9    8   66   98
[5,]    9    1   10    2    8   78
[6,]   80   22    9   80    5    3
[7,]    1   21   10    7    2    7