getForm: повторное подключение по ошибке

Question

Для проекта веб-очистки я часто делаю запросы на конкретном сайте. Иногда время соединения заканчивается ошибкой, и я хотел бы, чтобы он повторил попытку, вместо того, чтобы выходить из строя. Я написал код ниже, чтобы он продолжал пытаться, но я не думаю, что это работает, потому что я все еще ошибаюсь.

url = "www.google.com" 
while(true){ 
    withRestarts(tryCatch(
     sourcecode <- getForm(urls[n]), 
     finally = Sys.sleep(2), 
     abort = function(){}) 
} 

Ошибка в функции (тип, сообщ, asError = TRUE): не может подключиться к хозяина

Answer 1

получил его после экспериментов:

while(length(sourcecode.ad) == 0){ 
     try({ 
     sourcecode <- getForm(urls[n]) 
     print(urls[n]) 
     Sys.sleep(1) 
     }) 
    } 

Try() позволит продолжить после возникновения ошибки. В сочетании с циклом он будет продолжать повторять попытку.