On 06/12/2011 1:42 PM, Pavan G wrote: > Hello All, > > How do I find the x value at max density for say, this plot > plot(density(rnorm(1000))) d <- density(rnorm(1000)) plot(d) abline(v=d$x[which.max(d$y)]) Duncan Murdoch