如何消除匹配某些条件的矩阵行？在 R 中答案

【问题标题】：how to eliminate the rows of a matrix matching certain conditions? in R如何消除匹配某些条件的矩阵行？在 R 中
【发布时间】：2013-07-08 19:20:05
【问题描述】：

我有这个矩阵：

mm <- matrix(c(1,2,0,0,3,0,0,0,3,4,0,2,2,0,1,0,2,0,0,0,2,0,0,2,0,0,1,0,0,1,0,2,0,1,0,3,0,2,0,3),10,4)

并且我想消除所有那些只有一个元素与 0 不同的行，例如：3 0 0 0 或 0 2 0 0，但我想保留那些具有多个不同元素的行0，如3 1 0 0。

对此的任何帮助将不胜感激。

蒂娜。

【问题讨论】：

标签： r matrix conditional-statements

【解决方案1】：

mm[rowSums(mm != 0) > 1,]
#     [,1] [,2] [,3] [,4]
#[1,]    1    0    2    0
#[2,]    2    2    0    2
#[3,]    0    0    2    1
#[4,]    3    1    0    0
#[5,]    0    2    1    0
#[6,]    4    0    1    3

【讨论】：