不用循环，如何这样合并两个矩阵

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

想请问如果不用循环（因为我的程序中用的矩阵很大，而且对速度有要求，如果循环会很慢），应该如何合并两个矩阵，非常非常感谢：
A=
1 2 3
4 5 6
7 8 9
B=
0 9
0 7
合并后的结果希望是这样的：
1 2 3 0 9
1 2 3 0 7
4 5 6 0 9
4 5 6 0 7
7 8 9 0 9
7 8 9 0 7

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：非常感谢 矩阵 如何

> A2 <- A[rep(1:nrow(A), each = 2), ]
> B2 <- B[rep(1:nrow(B), 3), ]
> A2
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    1    2    3
[3,]    4    5    6
[4,]    4    5    6
[5,]    7    8    9
[6,]    7    8    9
> B2
     [,1] [,2]
[1,]    0    9
[2,]    0    7
[3,]    0    9
[4,]    0    7
[5,]    0    9
[6,]    0    7
> cbind(A2, B2)
     [,1] [,2] [,3] [,4] [,5]
[1,]    1    2    3    0    9
[2,]    1    2    3    0    7
[3,]    4    5    6    0    9
[4,]    4    5    6    0    7
[5,]    7    8    9    0    9
[6,]    7    8    9    0    7