R/policy-wait.R

wait <- function(tokens, exception) {
    pause(exception$wait_time)
    request(tokens, policy = wait)
}

pause <- function(wait_time) {
    Sys.sleep(wait_time + .02)
}

Try the ratelimitr package in your browser

Any scripts or data that you put into this service are public.

ratelimitr documentation built on May 2, 2019, 6:53 a.m.