Silently test if OAI-PMH service is available under the URL provided.

oai_available(u, ...)

Arguments

u

base URL to OAI-PMH service

...

other arguments passed to id()

Value

TRUE or FALSE if the service is available.

Examples

if (FALSE) {
url_list <- list(
  archivesic="http://archivesic.ccsd.cnrs.fr/oai/oai.php",
  datacite = "http://oai.datacite.org/oai",

  # No OAI-PMH here
  google = "http://google.com"
)

sapply(url_list, oai_available)
}