R/rate_limit.R
In ropensci/rbace: 'Bielefeld' Academic Search Engine ('BASE') Client
Defines functions
enforce_rate_limit
# enforce rate limits
enforce_rate_limit <- function() {
if (!Sys.getenv('rbace_time') == "") {
timesince <- as.numeric(Sys.time()) - as.numeric(Sys.getenv('rbace_time'))
if (timesince < 1) Sys.sleep(1 - timesince)
}
}
ropensci/rbace documentation built on Sept. 17, 2022, 12:34 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions enforce_rate_limit
# enforce rate limits
enforce_rate_limit <- function() {
if (!Sys.getenv('rbace_time') == "") {
timesince <- as.numeric(Sys.time()) - as.numeric(Sys.getenv('rbace_time'))
if (timesince < 1) Sys.sleep(1 - timesince)
}
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.