Re: Removing duplicates from Rows : Summary

[Jagadish Rangrej <jrangrej@yahoo.com>]

Hi !!

Thanks to Sundar and Brad and John for their replies.
use of "unique" and "duplicated" functions can help.

as well as the the function by John Walter:

ToRemoveDups<-function(foo3, Locx,Locy)
{
        x <- foo3[, Locx]
        y <- foo3[, Locy]
        x.pairs <- paste(x, y)  # create vector of the
pairs
        x.dup <- duplicated(x.pairs)    # vector
indicating the duplicates
        removedups <- cbind(foo3, x.dup)
        removedups[removedups[, dim(removedups)[2]] ==
FALSE,  ]
}


can be useful.

Thanks to everybody,
Jag



                
__________________________________ 
Yahoo! Mail - PC Magazine Editors' Choice 2005 
http://mail.yahoo.com