a<-matrix(1:10,1,10)
> a
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 2 3 4 5 6 7 8 9 10
> b<-matrix(1:30,3,10)
> b
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 4 7 10 13 16 19 22 25 28
[2,] 2 5 8 11 14 17 20 23 26 29
[3,] 3 6 9 12 15 18 21 24 27 30
> c<-matrix(1:40,4,10)
> c
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 5 9 13 17 21 25 29 33 37
[2,] 2 6 10 14 18 22 26 30 34 38
[3,] 3 7 11 15 19 23 27 31 35 39
[4,] 4 8 12 16 20 24 28 32 36 40
> d<-rbind(a,b,c)
> d
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 2 3 4 5 6 7 8 9 10
[2,] 1 4 7 10 13 16 19 22 25 28
[3,] 2 5 8 11 14 17 20 23 26 29
[4,] 3 6 9 12 15 18 21 24 27 30
[5,] 1 5 9 13 17 21 25 29 33 37
[6,] 2 6 10 14 18 22 26 30 34 38
[7,] 3 7 11 15 19 23 27 31 35 39
[8,] 4 8 12 16 20 24 28 32 36 40
>
感觉你是在开玩笑,! |