Description Usage Arguments Details References Examples
View source: R/core_journals.R
Get journal via its ISSN
1 2 3 4 5 | core_journals(id, key = NULL, method = "GET", parse = TRUE, ...)
core_journals_(id, key = NULL, method = "GET", ...)
core_repos_(id, key = NULL, method = "GET", ...)
|
id |
(integer) One or more journal ISSNs. Required |
key |
A CORE API key. Get one at
https://core.ac.uk/api-keys/register. Once you have the key,
you can pass it into this parameter, or as a much better option,
store your key as an environment variable with the name
|
method |
(character) one of 'GET' (default) or 'POST' |
parse |
(logical) Whether to parse to list ( |
... |
Curl options passed to |
core_journals
does the HTTP request and parses, while
core_journals_
just does the HTTP request, gives back JSON as a
character string
These functions take one article ID at a time. Use lapply/loops/etc for many ids
https://core.ac.uk/docs/#!/journals/getJournalByIssnBatch https://core.ac.uk/docs/#!/journals/getJournalByIssn
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | ## Not run:
core_journals(id = '2167-8359')
ids <- c("2167-8359", "2050-084X")
res <- lapply(ids, core_journals)
vapply(res, "[[", "", c("data", "title"))
# just http request, get text back
core_journals_('2167-8359')
# post request, ideal for lots of ISSNs
if (requireNamespace("rcrossref", quietly = TRUE)) {
library(rcrossref)
res <- lapply(c("bmc", "peerj", "elife", "plos", "frontiers"), function(z)
cr_journals(query = z))
ids <- na.omit(unlist(lapply(res, function(b) b$data$issn)))
out <- core_journals(ids, method = "POST")
head(out)
}
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.