Oh you are right Peter, thanks

On Fri, Aug 29, 2008 at 8:37 AM, Peter Dalgaard <P.Dalgaard@biostat.ku.dk>wrote:

> Henrique Dallazuanna wrote:
> > Try:
> >
> > as.numeric(names(which.max(table(x))))
> >
> > On Fri, Aug 29, 2008 at 3:13 AM, Manuel Ramon <manugen@gmail.com> wrote:
> >
>
> You missed the word "continuous" there...
> > x <- rnorm(10)
> > table(x)
> x
>  -1.64244637710945 -0.836534097622312 -0.810292826933485 -0.721008996586432
>                 1                  1                  1                  1
> -0.679702422788255 -0.667735659553467 -0.263432175981501 0.0795699932826675
>                 1                  1                  1                  1
>  0.387151850978792  0.761964511475389
>                 1                  1
> > as.numeric(names(which.max(table(x))))
> [1] -1.642446
>
>
> Instead, how about
>
>
> > dd <- density(x)
> > which.max(dd$y)
> [1] 227
> > dd$x[which.max(dd$y)]
> [1] -0.6938049
> > plot(dd)
> > rug(x)
> > abline(v=dd$x[which.max(dd$y)])
>
> >
> >> Is there any R funtion that allow the estimation of mode in a continuous
> >> variable?
> >> Thank you
> >> --
> >> View this message in context:
> >>
> http://www.nabble.com/how-to-calculate-the-mode-of-a-continuous-variable-tp19214243p19214243.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.
> >>
> >>
> >
> >
> >
> >
> > ------------------------------------------------------------------------
> >
> > ______________________________________________
> > 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.
> >
>
>
> --
>    O__  ---- Peter Dalgaard             Řster Farimagsgade 5, Entr.B
>  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
>  (*) \(*) -- University of Copenhagen   Denmark      Ph:  (+45) 35327918
> ~~~~~~~~~~ - (p.dalgaard@biostat.ku.dk)              FAX: (+45) 35327907
>
>
>


-- 
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O

	[[alternative HTML version deleted]]

