找到的第一場比賽將目光從元素早在矢量r

Question

我有，我確定的局部最大值時間序列。現在我想從最大值中查找具有零值的第一個元素的索引。例如。

my.seq <- c(sin(0:(2*pi)), rep(0, 5), sin(seq(0, (2*pi), 0.5))) 

局部最大值：

indx.max <- c(3, 16) 

我想：

c(1, 13) 

感謝

Answer 1

你可以試試：

x<-which(my.seq==0) 
x[findInterval(indx.max,x)] 
#[1] 1 13