如何通过加法合并R矩阵中的两行？

要通过加法合并R矩阵中的两行，我们可以按照以下步骤操作-

首先，创建一个矩阵。

然后，使用加号(+)将两行相加并将相加存储在其中一行中。

之后，删除不需要的行，用单个方括号进行子集化。

示例

创建矩阵

让我们创建一个矩阵，如下所示-

M<-matrix(sample(1:5,100,replace=TRUE),ncol=4) M输出结果

执行时，上述脚本生成以下内容output(thisoutputwillvaryonyoursystemduetorandomization)-

[,1] [,2] [,3] [,4] [1,] 4 4 2 1 [2,] 5 4 4 4 [3,] 1 1 5 3 [4,] 1 4 4 4 [5,] 5 1 1 3 [6,] 3 1 2 1 [7,] 4 4 5 2 [8,] 3 4 2 1 [9,] 2 2 4 4 [10,] 4 1 1 2 [11,] 5 3 1 2 [12,] 3 1 2 4 [13,] 3 3 2 3 [14,] 3 3 1 1 [15,] 5 5 5 5 [16,] 4 1 2 5 [17,] 4 2 5 1 [18,] 3 4 1 5 [19,] 5 3 4 4 [20,] 2 5 1 1 [21,] 5 3 5 5 [22,] 2 4 2 3 [23,] 5 5 2 5 [24,] 3 5 4 1 [25,] 4 1 2 5

添加两行

使用加号将第1行和第2行相加，然后将总和存储在第1行-

M<-matrix(sample(1:5,100,replace=TRUE),ncol=4) M[1,]<-M[1,]+M[2,] M输出结果 [,1] [,2] [,3] [,4] [1,] 9 8 6 5 [2,] 5 4 4 4 [3,] 1 1 5 3 [4,] 1 4 4 4 [5,] 5 1 1 3 [6,] 3 1 2 1 [7,] 4 4 5 2 [8,] 3 4 2 1 [9,] 2 2 4 4 [10,] 4 1 1 2 [11,] 5 3 1 2 [12,] 3 1 2 4 [13,] 3 3 2 3 [14,] 3 3 1 1 [15,] 5 5 5 5 [16,] 4 1 2 5 [17,] 4 2 5 1 [18,] 3 4 1 5 [19,] 5 3 4 4 [20,] 2 5 1 1 [21,] 5 3 5 5 [22,] 2 4 2 3 [23,] 5 5 2 5 [24,] 3 5 4 1 [25,] 4 1 2 5

删除不需要的行

使用单正方形子集以除去2次从矩阵M行-

M<-matrix(sample(1:5,100,replace=TRUE),ncol=4) M[1,]<-M[1,]+M[2,] M[-2,]输出结果 [,1] [,2] [,3] [,4] [1,] 9 8 6 5 [2,] 1 1 5 3 [3,] 1 4 4 4 [4,] 5 1 1 3 [5,] 3 1 2 1 [6,] 4 4 5 2 [7,] 3 4 2 1 [8,] 2 2 4 4 [9,] 4 1 1 2 [10,] 5 3 1 2 [11,] 3 1 2 4 [12,] 3 3 2 3 [13,] 3 3 1 1 [14,] 5 5 5 5 [15,] 4 1 2 5 [16,] 4 2 5 1 [17,] 3 4 1 5 [18,] 5 3 4 4 [19,] 2 5 1 1 [20,] 5 3 5 5 [21,] 2 4 2 3 [22,] 5 5 2 5 [23,] 3 5 4 1 [24,] 4 1 2 5