如何通过加法合并 R 矩阵中的两行?
如需通过加法合并 R 矩阵中的两行,我们可以按照以下步骤操作:
首先,创建一个矩阵。
然后,使用加号(+)添加两行并将加法结果存储在一行中。
之后,使用单个方括号进行子集化移除不需要的行。
示例
创建矩阵
让我们创建一个如下所示的矩阵:
M<-matrix(sample(1:5,100,replace=TRUE),ncol=4) M
输出
执行完上述脚本后,会生成如下输出(此输出会因随机化而有所不同):
[,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
移除不需要的行
使用单个方括号子集化从矩阵 M 中移除第 2 行:
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
广告
数据结构
网络
RDBMS
操作系统
Java
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP