R语言 如何定位一组离散数据的极值点

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教大家，R语言中， 如何定位一组离散数据的极值点，optim和optimum函数好像都是求解函数的极值点的？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何定位 离散数据 R语言 Optimum Optim 如何

是要求离散数据的极值不是求最值？试试多项式拟合一下再求极值？

谢谢你的解答，可是这求出来是最大值，可能极值有好几个的情况，有多个波峰，这个怎么办呢？

XCc0900720130 发表于 2015-7-21 11:47
谢谢你的解答，可是这求出来是最大值，可能极值有好几个的情况，有多个波峰，这个怎么办呢？

多项式拟合以后，问题变成，求连续函数的极值。找到导数为零的点就好了。

> x<-rpois(10,lambda=2)

> x
[1] 3 1 2 1 1 1 2 4 2 1

> max(x)
[1] 4

> which.max(x)
[1] 8

多极值问题 恐怕得自己编程序了

谢谢，不过我求的是极值。这里的话，极大值起码2个，分别为2和4.

位置分别为3 和 8 。

x <- rpois(100, lambda = 2)
x
plot(x, type = "l")
id <- vector(length = 100)
for (m in 1:(length(x) - 2)) {
    tmp <- which.max(x[m:(m + 2)])
    id[m + 1] <- tmp == 2
}
id

才明白你要干什么
楼上正解

感谢各位的关注，棒棒哒，哈哈。