removing the rows with negative elements

 x[-which(x < 0, arr.ind=TRUE)[,1],]

but I'm sure someone will suggest an easier way.

Simon.

On Wed, 2010-01-06 at 05:13 +0000, faridamsb at gmail.com wrote:

Hello All,

I would like to remove the entire row, if there is any negative element in  
that row. What is the best way to do that?

For example,

x<-matrix(c(2,-1,-2,3,5,6,-3,7,4,2,1,0), 4, 3)

the returning matrix should look like

[,1] [,2] [,3]
[1,] 2 5 4
[2,] 3 7 0


Thank you in advance,

FM

	[[alternative HTML version deleted]]