在 R 中的异常处理中赋值

 while(bo!=10){
  x = tryCatch(getURLContent(Site, verbose = F, curl = handle),
            error = function(e) {
               cat("ERROR1: ", e$message, "\n")
               Sys.sleep(1)
               print("reconntecting...")
               bo <- bo+1
               print(bo)
               })
  print(bo)
  if(bo==0) bo=10 
}

我想在连接失败后每秒尝试重新连接。但新分配的bo值并没有生效。我怎样才能做到这一点？或者，如果您知道如何使用 RCurl 选项重新连接（我真的没有找到任何东西），那就太棒了。

感谢每一次帮助

问题是b0任务的范围。然而，我发现try比tryCatch。这应该有效：

while(bo!=10){
    x = try(getURLContent(Site, verbose = F, curl = handle),silent=TRUE)
    if (class(x)=="try-error") {
           cat("ERROR1: ", x, "\n")
           Sys.sleep(1)
           print("reconnecting...")
           bo <- bo+1
           print(bo)
     } else {
           break
     } 
}

以上尝试连接该站点 10 次。如果这一次成功，它就会退出。