在0-1组成的向量中, 如果连续为k个1, 则打印下标, 但是,下面的程序中向量(10111),理论上用笔算的应该是打印3和4的位置,为什么总是打印出了2 的位置呢?

#游标为2的位置
finds=function(x,k){
n<-length(x)
ru<-NULL

for(i in 1:(n-k+1)){
  if(all(x[i:i+k-1]==1)) ru=c(ru,i)
}
return(ru)

}

finds(c(1,0,1,1,1),2)