如何以一系列值为条件

Question

我想限制一定范围内的值-即，如果以下所有k个值均为0，则设置常数减去5

for (i in 14:(nrow(data) - hold.pd - 1)){
  if (data$WaitBin[(i+1):(i+wait.pd)] == c(rep(0, wait.pd))) {
    weight == weight - 5 
  }
}

我收到警告，指出条件的长度> 1