Thanks to Andy Liaw and J.R. Lockwood for your suggestions.  The which.max() worked 
great along with the rownames.  The complete solution for me was:

a <- table(varname)
> my.mode <- rownames(a)[which.max(a)]
> my.mode
[1] "1"

Amazing how a simple concept such as mode can present problems for us.  Thanks again.

To reply to Spencer Graves' question, I didn't find the disucssion via search.  I 
guess I might have overlooked the thread if it were titled kernel density since that 
seemed far too technical for this basic topic.  Sorry if I cluttered up the list 
though.

Cheers,

Patrick


On Fri, 30 Jan 2004 16:47:54 -0500 (EST)
"J.R. Lockwood" <[EMAIL PROTECTED]> wrote:

> it is an annoyance that table() provides the values being tables as
> the rownames of the resultant vector.  you can do something like:
> 
> a<-table(x)
> rownames(a)[which.max(a)]
> 
> On Fri, 30 Jan 2004, Patrick E. McKnight wrote:
> 
> > Date: Fri, 30 Jan 2004 13:55:19 -0700
> > From: Patrick E. McKnight <[EMAIL PROTECTED]>
> > To: "[EMAIL PROTECTED]" <[EMAIL PROTECTED]>
> > Subject: [R] Measures of central tendency - mode
> > 
> > Greetings,
> > 
> > This seems too rudimentary to ask but for the life of me I cannot locate a readily 
> > easy method to compute the univariate mode.  I know "mode" is not correct and 
> > "table" provides a reasonable count but I figured there would be an easy way to 
> > extract the value from the table after I do something like:
> > 
> > max(table(mydadat$myvar))
> > 
> > unfortunately it only returns the max count and not the value that is observed 
> > most.  Would some kind soul help me out with this seemingly trivial problem?
> > 
> > Thanks in advance.
> > 
> > Cheers,
> > 
> > Patrick
> > 
> > ______________________________________________
> > [EMAIL PROTECTED] mailing list
> > https://www.stat.math.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
> > 
> 
> J.R. Lockwood
> 412-683-2300 x4941
> [EMAIL PROTECTED]
> http://www.rand.org/methodology/stat/members/lockwood/
>

______________________________________________
[EMAIL PROTECTED] mailing list
https://www.stat.math.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to