如何将两个矩阵乘以R中的元素?
要将两个矩阵乘以R中的元素,我们需要将其中一个矩阵用作向量。例如,如果我们有两个由名称M1和M2定义的矩阵,则可以通过使用M1 * as.vector(M2)将这些矩阵与元素相乘。在进行这种乘法时,我们需要记住的主要事情是两个矩阵中的行数相等。
示例
M1<-matrix(1:25,ncol=5)M1
输出结果
[,1] [,2] [,3] [,4] [,5][1,] 1 6 11 16 21
[2,] 2 7 12 17 22
[3,] 3 8 13 18 23
[4,] 4 9 14 19 24
[5,] 5 10 15 20 25
示例
M2<-matrix(1:25,ncol=5)M2
输出结果
[,1] [,2] [,3] [,4] [,5][1,] 1 6 11 16 21
[2,] 2 7 12 17 22
[3,] 3 8 13 18 23
[4,] 4 9 14 19 24
[5,] 5 10 15 20 25
示例
M1*as.vector(M2)
输出结果
[,1] [,2] [,3] [,4] [,5][1,] 1 36 121 256 441
[2,] 4 49 144 289 484
[3,] 9 64 169 324 529
[4,] 16 81 196 361 576
[5,] 25 100 225 400 625
示例
M3<-matrix(rnorm(36),nrow=6)M3
输出结果
[,1] [,2] [,3] [,4] [,5] [,6][1,] -0.66269194 -1.7457905 0.4271430 1.81482482 -1.52828812 0.1507425
[2,] 0.09297130 -0.5364919 0.8380242 -0.02126481 -0.03926208 0.2150862
[3,] 0.84724054 1.2285630 -0.8867815 1.27482991 0.76055452 0.3949002
[4,] -1.65257106 -0.7111136 2.0442647 -0.69539458 -1.89791811 1.8776415
[5,] -1.65376676 -1.7332403 0.5251878 1.20379635 0.21809336 -1.4143876
[6,] 0.09506334 -0.1884270 1.8049270 0.64850025 -0.36684996 0.7390629
示例
M4<-matrix(rnorm(36),nrow=6)M4
输出结果
[,1] [,2] [,3] [,4] [,5] [,6][1,] 0.7435446 -1.6258520 -0.3318020 -1.3084350 0.2875227 -0.99886827
[2,] -1.6527269 -0.5240276 -0.6695268 0.2736843 0.9960383 -1.03338278
[3,] -2.0807263 -1.1482815 -0.6361266 -2.6593496 0.5059342 -0.07586589
[4,] 0.6829553 0.6814575 -0.1174571 -0.4193767 -0.6077792 -0.04488023
[5,] -0.4490323 -1.0317825 -1.7346983 0.8237790 0.6099129 0.42651656
[6,] 0.8599890 -0.1197610 1.1092640 -0.6074690 0.6888512 -0.58980418
示例
M3*as.vector(M4)
输出结果
[,1] [,2] [,3] [,4] [,5] [,6][1,] -0.49274103 2.83839710 -0.1417269 -2.374580244 -0.43941754 -0.15057195
[2,] -0.15365618 0.28113657 -0.5610796 -0.005819844 -0.03910654 -0.22226640
[3,] -1.76287571 -1.41073618 0.5641054 -3.390218430 0.38479058 -0.02995946
[4,] -1.12863221 -0.48459370 -0.2401134 0.291632294 1.15351521 -0.08426899
[5,] 0.74259470 1.78832703 -0.9110424 0.991662178 0.13301795 -0.60325973
[6,] 0.08175343 0.02256622 2.0021405 -0.393943794 -0.25270505 -0.43590241
示例
M5<-matrix(rpois(64,5),nrow=8)M5
输出结果
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8][1,] 3 3 2 3 4 7 10 6
[2,] 6 6 7 4 2 7 7 0
[3,] 6 3 9 8 12 8 7 5
[4,] 4 6 4 7 3 2 5 4
[5,] 4 5 6 6 4 5 6 4
[6,] 7 7 8 4 2 5 3 6
[7,] 2 0 4 6 3 5 5 7
[8,] 7 4 3 3 10 8 8 4
示例
M6<-matrix(rpois(64,5),nrow=8)M6
输出结果
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8][1,] 5 9 5 6 9 5 7 9
[2,] 6 5 4 13 7 4 6 4
[3,] 8 4 5 5 8 7 1 6
[4,] 1 4 1 3 5 3 5 2
[5,] 5 7 5 2 5 4 10 3
[6,] 2 6 6 3 4 8 2 6
[7,] 10 6 7 7 6 6 8 4
[8,] 9 1 4 11 5 7 6 2
示例
M5*as.vector(M6)
输出结果
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8][1,] 15 27 10 18 36 35 70 54
[2,] 36 30 28 52 14 28 42 0
[3,] 48 12 45 40 96 56 7 30
[4,] 4 24 4 21 15 6 25 8
[5,] 20 35 30 12 20 20 60 12
[6,] 14 42 48 12 8 40 6 36
[7,] 20 0 28 42 18 30 40 28
[8,] 63 4 12 33 50 56 48 8
示例
M8−-matrix(sample(0:9,36,replace=TRUE),nrow=6)M8
输出结果
[,1] [,2] [,3] [,4] [,5] [,6][1,] 1 1 3 3 2 9
[2,] 2 2 1 4 3 6
[3,] 5 3 4 0 0 8
[4,] 4 0 9 1 5 8
[5,] 8 9 4 7 0 5
[6,] 2 3 1 5 8 1
示例
M7*as.vector(M8)
输出结果
[,1] [,2] [,3] [,4] [,5] [,6][1,] 4 7 24 9 4 63
[2,] 6 14 3 24 6 24
[3,] 0 24 36 0 0 16
[4,] 12 0 45 3 45 0
[5,] 16 18 4 14 0 0
[6,] 10 21 9 10 32 3
示例
M9<-matrix(sample(501:999,16),ncol=4)M9
输出结果
[,1] [,2] [,3] [,4][1,] 591 926 909 660
[2,] 872 976 625 868
[3,] 801 929 690 697
[4,] 992 599 662 879
示例
M10<-matrix(sample(501:999,16),ncol=4)M10
输出结果
[,1] [,2] [,3] [,4][1,] 731 772 750 854
[2,] 798 858 641 635
[3,] 613 579 560 790
[4,] 589 760 504 876
示例
M9*as.vector(M10)
输出结果
[,1] [,2] [,3] [,4][1,] 432021 714872 681750 563640
[2,] 695856 837408 400625 551180
[3,] 491013 537891 386400 550630
[4,] 584288 455240 333648 770004
示例
M11<-matrix(sample(501:999,16),ncol=4)M11
输出结果
[,1] [,2] [,3] [,4][1,] 690 550 737 749
[2,] 771 519 652 745
[3,] 522 841 733 825
[4,] 842 752 800 934
示例
M12<-matrix(sample(501:999,8),ncol=2)M12
输出结果
[,1] [,2][1,] 969 784
[2,] 648 833
[3,] 914 808
[4,] 947 585
示例
M11*as.vector(M12)
输出结果
[,1] [,2] [,3] [,4][1,] 668610 431200 714153 587216
[2,] 499608 432327 422496 620585
[3,] 477108 679528 669962 666600
[4,] 797374 439920 757600 546390
以上是 如何将两个矩阵乘以R中的元素? 的全部内容, 来源链接: utcz.com/z/315945.html