Don't know if this is more elegant: names(which.max(table(x)))
Andy > From: Rajarshi Guha > > Hi, I have a factor and I would like to find the most frequent level. > > I think my current approach is a bit long winded and I was > wondering if > there was a more elegant way to do it: > > x <- factor(sample(1:0, 5,replace=TRUE)) > > levels(x)[ which( as.logical((table(x) == max(table(x)))) == TRUE ) ] > > (The length of x will always be an odd number, so I wont get a tie in > max()) > > Thanks, > > ------------------------------------------------------------------- > Rajarshi Guha <[EMAIL PROTECTED]> <http://jijo.cjb.net> > GPG Fingerprint: 0CCA 8EE2 2EEB 25E2 AB04 06F7 1BB9 E634 9B87 56EE > ------------------------------------------------------------------- > Alcohol, an alternative to your self > - 'Alcohol' by the Bare Naked Ladies > > ______________________________________________ > R-help@stat.math.ethz.ch mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide! > http://www.R-project.org/posting-guide.html > > > ______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html