R语言获取核密度图最高点对应的x,y值

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

用plot(density(a))画出的图像如下：

现在确定图中最高点的x值。
最高点的y值可以通过density(a)函数确定
> density(a)

Call:
        density.default(x = a)

Data: a (569 obs.);     Bandwidth 'bw' = 0.7705

       x                             y            
Min.   : 4.669       Min.   :1.097e-05  
1st Qu.:11.107    1st Qu.:2.464e-03  
Median :17.546    Median :2.190e-02  
Mean   :17.546    Mean   :3.879e-02  
3rd Qu.:23.984    3rd Qu.:5.421e-02  
Max.   :30.422    Max.   :1.466e-01


也就是说已知在核密度图中y=1.466e-01，如何确定对应的x是多少？
或者有没有什么方法可以直接获得图像最高点的x,y值？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：核密度图 核密度 R语言 最高点 bandwidth 核密度图 最高点

参考：

1. d<-rnorm(100)
   
2. x<-density(d)
   
3. plot(x)
   
4. abline(h=max(x$y),v=x$x[which.max(x$y)],col="red")

复制代码