Try evaluating an expressing multiple times until it succeeds.
Try evaluating an expressing multiple times until it succeeds.
try_again(times, code)
times |
Maximum number of attempts. |
code |
Code to evaluate |
third_try <- local({ i <- 3 function() { i <<- i - 1 if (i > 0) fail(paste0("i is ", i)) } }) try_again(3, third_try())
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.