怎么可以把一个2乘2的矩阵变成4乘1的？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题，要按列将数据合并

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据合并

1. matrix(c(data))

复制代码

> m=matrix(1:12,6,2)
> m
     [,1] [,2]
[1,]    1    7
[2,]    2    8
[3,]    3    9
[4,]    4   10
[5,]    5   11
[6,]    6   12
> as.vector(m)
[1]  1  2  3  4  5  6  7  8  9 10 11 12
> array(m)
[1]  1  2  3  4  5  6  7  8  9 10 11 12

> m <- matrix(c(1,2,3,4), nrow=2)
> m
     [,1] [,2]
[1,]    1    3
[2,]    2    4
> dim(m) <- c(4,1)
> m
     [,1]
[1,]    1
[2,]    2
[3,]    3
[4,]    4

记得要加好评哦，亲

我简直弱爆了，谢谢各位~

xuruilong100 发表于 2015-1-9 17:33
> m  m
     [,1] [,2]
[1,]    1    3

请问如果我是一堆矩阵a,b,c,d，怎么写成循环？

ntwd87 发表于 2015-1-9 18:32
请问如果我是一堆矩阵a,b,c,d，怎么写成循环？

1. m1 <- matrix(c(1,2,3,4), nrow=2)
   
2. m2 <- matrix(c(1,2,3,4), nrow=2)
   
3. m3 <- matrix(c(1,2,3,4), nrow=2)
   
4. 
   
5. #装入一个容器
   
6. list.mat <- list(m1, m2, m3)
   
7. list.mat
   
8. 
   
9. #这样是有效的
   
10. for (i in 1:length(list.mat))
    
11. {
    
12.   dim.mat <- dim(list.mat[[i]])
    
13.   dim(list.mat[[i]]) <- c(dim.mat[1]*dim.mat[2], 1)
    
14.   cat(dim(list.mat[[i]]),'\n')
    
15. }
    
16. 
    
17. #这样是无效的，具体的原因和可能Python中相似的问题一致，
    
18. #是解释型语言的底层机制决定的
    
19. for (i in list.mat)
    
20. {
    
21.   dim.mat <- dim(i)
    
22.   dim(i) <- c(dim.mat[1]*dim.mat[2], 1)
    
23.   cat(dim(i),'\n')
    
24. }
    
25. 
    
26. 
    
27. list.mat

复制代码

记得点击“评分”按键加好评哦， 亲（づ￣3￣）づ╭❤～