如果错误，重试 for-loop R 循环

Question

我有一个 R For 循环，它从服务器下载数据并将结果添加到表中，但是，有时我会在停止循环时遇到错误。如果我告诉它重做上次下载并继续，它会在下一个错误之前再工作一段时间。 错误与代码或数据无关，而是随机的；有时它会运行 2.5 小时，有时它会在 45 分钟后停止下载相同的数据。
如果出现错误并重试，有没有办法让我的循环后退一步？ 例如。在

for (i in 1:1000){
    table[i,] <- downloadfnc("URL", file = i)
}

假设我在下载 i=500 时遇到错误，我要做的就是修复：

for (i in 500:1000){
    i <- i + 499     #since i starts at 1, 499+1=500
    table[i,] <- downloadfnc("URL",file = i)
}

然后即使上次出错，它也会下载文件“500”。 有没有办法可以自动化它，这样如果出现错误，它会后退一步（i-1）并重试（可能会延迟几秒钟）？

（使用 R 只用了几个星期，所以请简单谈谈）

Answer 1

你可以抛出一个尝试接住的组合。

for (i in 1:1000){
    while(TRUE){
       df <- try(downloadfnc("URL", file = i), silent=TRUE)
       if(!is(df, 'try-error')) break
    }
    table[i,] <- df
}

这将在while循环中继续，直到文件成功下载，并且只有在成功下载后才会继续。