R for 越界终止循环答案

【问题标题】：R for loop termination on out of boundsR for 越界终止循环
【发布时间】：2014-05-01 20:54:53
【问题描述】：

我想在 R 中做如下嵌套的 for 循环结构：

x<- c(a,b,c,d,e)
for(i in 1:length(x)){
  for(j in (i+1):length(x)){
     do something with (x, j)
  }
}

但是，最终发生的情况是，在某一点 j=6（因为 j 从 i+1 开始），循环仍然尝试执行并导致越界。

当然，我总是可以在运行命令之前放入 if 语句来检查 j

感谢您的帮助！

【问题讨论】：

【解决方案1】：

试试这个：

for( j in seq(i + 1, length = length(x) - i) ) ...

或

for( j in i + seq_len(length(x) - i) ) ...

或

for( j in seq(i, length(x))[-1] ) ...

【讨论】：

【解决方案2】：

通常的建议是使用 seq_along：

x<- c(a,b,c,d,e)
for(i in seq_along(x)){
  for(j in seq_along( x[ -(1:i) ] ){
     do something with (x, i, j)
  }
}

【讨论】：