Rで最頻値の出し方を教えてください。

densityを用いて最頻値（モード）を算出しようと思っています。
グラフまでは書くことができたんですが，結局のところモードがいくつなのかが分かりません。
どのように算出すればよいのでしょうか。

No.2 ベストアンサー 回答者： quaestio 回答日時： 2013/03/31 20:19

すみません。

こっちの方が良いですね。

y$x[which.max(y$y)]

この回答へのお礼

回答ありがとうございます。

お礼日時：2013/03/31 20:38

No.1 回答者： quaestio 回答日時： 2013/03/31 19:37

これでは駄目でしょうか？

x <- rnorm(100)
y <- density(x)
plot(y)
y$x[y$y == max(y$y)]