스플라인을 사용하여 밀도 함수의 국소 극한값 찾기

확률 밀도 함수 (R의 density방법을 사용하여 찾음)에 대한 로컬 최대 값을 찾으려고합니다 . 많은 양의 데이터가 있기 때문에 간단한 "인접 이웃 둘러보기"방법을 사용할 수 없습니다 (이것은 주변 이웃에 대해 로컬 최대 값인지 확인하기 위해 포인트를 둘러 보는 방법). 또한 내결함성 및 기타 매개 변수를 사용하여 "이웃을 둘러보기"를 구축하는 것과 달리 스플라인 보간과 같은 것을 사용하고 1 차 미분의 근본을 찾는 것이 더 효율적이고 일반적인 것 같습니다.

그래서 내 질문 :

1. 의 함수가 주어지면 splinefun어떤 방법으로 로컬 최대 값을 찾을 수 있습니까?
2. 를 사용하여 반환 된 함수의 파생 상품을 찾는 쉬운 / 표준 방법이 있습니까 splinefun 있습니까?
3. 확률 밀도 함수의 국소 최대 값을 찾는 더 나은 / 표준적인 방법이 있습니까?

참고로 아래는 밀도 함수의 도표입니다. 내가 작업하고있는 다른 밀도 함수는 형태가 비슷합니다. 나는 R이 처음이지만 프로그래밍에 익숙하지 않다고 말해야하므로 필요한 것을 달성하기위한 표준 라이브러리 또는 패키지가있을 수 있습니다.

당신의 도움을 주셔서 감사합니다!!

당신이하고 싶은 것은 화학 측정에서 피크 검출이라고합니다. 이를 위해 사용할 수있는 다양한 방법이 있습니다. 여기서는 매우 간단한 접근 방식 만 보여줍니다.

require(graphics)
#some data
d <- density(faithful$eruptions, bw = "sj")

#make it a time series
ts_y<-ts(d$y)

#calculate turning points (extrema)
require(pastecs)
tp<-turnpoints(ts_y)
#plot
plot(d)
points(d$x[tp$tppos],d$y[tp$tppos],col="red")