如何从R中的矩阵中删除重复的列?
要从 R 中的矩阵中删除重复的列,我们可以使用 unique 函数。
例如,如果我们有一个名为 M 的矩阵,其中包含一些重复的列,那么我们可以使用以下命令删除这些重复的列 -
unique(M,MARGIN=2)
示例 1
以下代码段创建了一个示例矩阵 -
M1<-matrix(c(rep(10,20),rpois(20,5),rep(10,20)),ncol=3,byrow=FALSE)M1
创建以下矩阵 -
[,1] [,2] [,3][1,] 10 3 10
[2,] 10 8 10
[3,] 10 7 10
[4,] 10 6 10
[5,] 10 5 10
[6,] 10 6 10
[7,] 10 2 10
[8,] 10 11 10
[9,] 10 1 10
[10,] 10 2 10
[11,] 10 8 10
[12,] 10 6 10
[13,] 10 6 10
[14,] 10 3 10
[15,] 10 6 10
[16,] 10 2 10
[17,] 10 7 10
[18,] 10 5 10
[19,] 10 7 10
[20,] 10 6 10
要从上面创建的矩阵上的矩阵 M1 中删除重复的列,请将以下代码添加到上面的代码段中 -
M1<-matrix(c(rep(10,20),rpois(20,5),rep(10,20)),ncol=3,byrow=FALSE)输出结果unique(M1,MARGIN=2)
如果您将上述所有给定的片段作为单个程序执行,它会生成以下输出 -
[,1] [,2][1,] 10 3
[2,] 10 8
[3,] 10 7
[4,] 10 6
[5,] 10 5
[6,] 10 6
[7,] 10 2
[8,] 10 11
[9,] 10 1
[10,] 10 2
[11,] 10 8
[12,] 10 6
[13,] 10 6
[14,] 10 3
[15,] 10 6
[16,] 10 2
[17,] 10 7
[18,] 10 5
[19,] 10 7
[20,] 10 6
示例 2
以下代码段创建了一个示例矩阵 -
M2<-matrix(c(rpois(20,2),rep(1,20),rpois(20,5),rep(1,20)),ncol=4,byrow=FALSE)M2
创建以下矩阵 -
[,1] [,2] [,3] [,4][1,] 1 1 5 1
[2,] 4 1 8 1
[3,] 1 1 6 1
[4,] 1 1 2 1
[5,] 0 1 5 1
[6,] 2 1 5 1
[7,] 3 1 6 1
[8,] 1 1 4 1
[9,] 1 1 7 1
[10,] 0 1 5 1
[11,] 3 1 9 1
[12,] 1 1 2 1
[13,] 1 1 6 1
[14,] 0 1 3 1
[15,] 1 1 2 1
[16,] 0 1 4 1
[17,] 1 1 5 1
[18,] 4 1 3 1
[19,] 3 1 3 1
[20,] 4 1 3 1
要从上面创建的矩阵上的矩阵 M2 中删除重复列,请将以下代码添加到上面的代码片段中 -
M2<-matrix(c(rpois(20,2),rep(1,20),rpois(20,5),rep(1,20)),ncol=4,byrow=FALSE)输出结果unique(M2,MARGIN=2)
如果您将上述所有给定的片段作为单个程序执行,它会生成以下输出 -
[,1] [,2] [,3][1,] 1 1 5
[2,] 4 1 8
[3,] 1 1 6
[4,] 1 1 2
[5,] 0 1 5
[6,] 2 1 5
[7,] 3 1 6
[8,] 1 1 4
[9,] 1 1 7
[10,] 0 1 5
[11,] 3 1 9
[12,] 1 1 2
[13,] 1 1 6
[14,] 0 1 3
[15,] 1 1 2
[16,] 0 1 4
[17,] 1 1 5
[18,] 4 1 3
[19,] 3 1 3
[20,] 4 1 3
以上是 如何从R中的矩阵中删除重复的列? 的全部内容, 来源链接: utcz.com/z/354384.html