# I think this does what you want
d <- rbind(c(1,    0,    6,    4),
c(2,    5,   7,    5),
c(3,    6,    8,    6),
c(4,    0,    0,    0))
f <- as.matrix(d)
f[-which(rowSums(f==0)>0),]

On Sun, Nov 9, 2008 at 8:30 AM, mentor_ <[EMAIL PROTECTED]> wrote:
>
> Have found a solution:
>
> matrix[rowSums(matrix == 0) == 0, ]
>
>
>
> mentor_ wrote:
>>
>> Hi,
>>
>> I have a further question about matrix manipulation.
>>
>> Imagine the following two matrices:
>>> test
>>      [,1] [,2] [,3] [,4]
>> [1,]    1    0    6    4
>> [2,]    2    5    7    5
>> [3,]    3    6    8    6
>> [4,]    4    0    0    0
>>
>>> matrix(is.element(test,0), ncol=4)
>>       [,1]  [,2]  [,3]  [,4]
>> [1,] FALSE  TRUE FALSE FALSE
>> [2,] FALSE FALSE FALSE FALSE
>> [3,] FALSE FALSE FALSE FALSE
>> [4,] FALSE  TRUE  TRUE  TRUE
>>
>> How can I apply the TRUE FALSE matrix to the 'test' matrix so that all
>> rows
>> having at least one zero value will be thrown out.
>>
>> So after applying the TRUE FALSE matrix the test matrix shoud look like
>> the following:
>>      [,1] [,2] [,3] [,4]
>> [1,]    2    5    7    5
>> [2,]    3    6    8    6
>>
>> Cheers
>>
>
> --
> View this message in context: 
> http://www.nabble.com/Delete-rows-from-matrix-having-at-least-one-zero-value-tp20405964p20406333.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>



-- 
Stephen Sefick
Research Scientist
Southeastern Natural Sciences Academy

Let's not spend our time and resources thinking about things that are
so little or so large that all they really do for us is puff us up and
make us feel like gods.  We are mammals, and have not exhausted the
annoying little problems of being mammals.

                                                                -K. Mullis

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to