R语言中 矩阵的直和 和直积的写法

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

比如：

1. > A <- matrix(c(1,2,3,3,2,1),2,3)
   
2. > A
   
3.      [,1] [,2] [,3]
   
4. [1,]    1    3    2
   
5. [2,]    2    3    1
   
6. >
   
7. > B <- matrix(c(1,0,6,1),2,2)
   
8. > B
   
9.      [,1] [,2]
   
10. [1,]    1    6
    
11. [2,]    0    1
    
12. > # 直积
    
13. > kronecker(A,B)
    
14.      [,1] [,2] [,3] [,4] [,5] [,6]
    
15. [1,]    1    6    3   18    2   12
    
16. [2,]    0    1    0    3    0    2
    
17. [3,]    2   12    3   18    1    6
    
18. [4,]    0    2    0    3    0    1
    
19. >
    
20. > # 直和
    
21. > dim(A)
    
22. [1] 2 3
    
23. > r1 <- dim(A)[1]
    
24. > c1 <- dim(A)[2]
    
25. > dim(B)
    
26. [1] 2 2
    
27. > r2 <- dim(B)[1]
    
28. > c2 <- dim(B)[2]
    
29. > rbind(cbind(A,matrix(0,r2,c2)),cbind(matrix(0,r1,c1),B))
    
30.      [,1] [,2] [,3] [,4] [,5]
    
31. [1,]    1    3    2    0    0
    
32. [2,]    2    3    1    0    0
    
33. [3,]    0    0    0    1    6
    
34. [4,]    0    0    0    0    1

复制代码

我的问题：
直积就有kronerker函数，直和有相应的函数么？
我一直没有找到，特来求助。

十分感谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：R语言 Kronecker matrix Kroner rbind 矩阵 直积 直和

既然你编出来了 可以作为一个自定义函数啊~