R语言for循环中跳过迭代失败：出现重复执行问题

咱们先拆解下你代码里的核心问题：

为什么你的代码没达到预期？ #

1. 循环对象选得不对：你用for (i in unique(DF$time))是在遍历每个独立的time值（也就是1到10），这个循环序列是固定的，不管你怎么修改ix，下一次循环还是会取下一个unique的time值，根本没法跳过迭代步骤。
2. ix的修改逻辑无效：你想通过ix=ix+3来跳转，但这只是改变了当前打印的索引，完全不影响循环的迭代顺序，反而会打印出其他行的索引，导致出现重复输出。
3. 没必要用which：因为DF$time是连续的1到10，i本身就对应行号，直接用i索引温度值就行，不用ix=which(i==DF$time)绕一圈。

两种正确的实现方式 #

方式一：用while循环灵活控制索引

这种方式最直观，直接手动控制迭代的索引值，想跳多少步就跳多少步：

Lines <- " time Temperature 1 38.3 2 38.5 3 38.9 4 40.1 5 38.0 6 38.6 7 37.9 8 38.2 9 37.5 10 38.0"
DF <- read.table(text = Lines, header = TRUE)

i <- 1
while(i <= nrow(DF)) {
  # 打印当前处理的行索引
  print(i)
  
  current_temp <- DF$Temperature[i]
  if(current_temp > 38.65) {
    # 温度超过阈值，跳过接下来的3个迭代，直接跳到i+3的位置
    i <- i + 3
  } else {
    # 正常迭代，索引+1
    i <- i + 1
  }
}

方式二：用for循环结合skip变量

如果更习惯用for循环，可以加一个skip变量记录需要跳过的迭代次数：

Lines <- " time Temperature 1 38.3 2 38.5 3 38.9 4 40.1 5 38.0 6 38.6 7 37.9 8 38.2 9 37.5 10 38.0"
DF <- read.table(text = Lines, header = TRUE)

skip_count <- 0
for (i in seq_len(nrow(DF))) {
  # 如果还有需要跳过的次数，直接跳过当前迭代
  if(skip_count > 0) {
    skip_count <- skip_count - 1
    next
  }
  
  print(i)
  current_temp <- DF$Temperature[i]
  if(current_temp > 38.65) {
    # 设置需要跳过的次数为3
    skip_count <- 3
  }
}

这两种方式都能实现你想要的“跳过部分迭代”的效果，不会出现重复执行的问题。

内容的提问来源于stack exchange，提问作者user8333220