2

私はこのマトリックスを持っています:

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)

3 0 0 0そして、要素の 1つだけが 0 と異なる行をすべて削除したいと思い0 2 0 0ます3 1 0 0

これに関するヘルプは非常に高く評価されます。

ティナ。

4

1 に答える 1

2
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
于 2013-07-08T19:21:59.500 に答える