pakillo / biblioformat Goto Github PK

http://ref.scholarcy.com/api/

Was receiving this error when running the biblioformat function. Not sure whether this was a problem specific to me, but I thought I'd be worth posting in case others run into it.

Error in biblioformat(refs) : is.character(refs.dois) is not TRUE
In addition: Warning messages:
1: Unknown or uninitialised column: 'DOI'.
2: Unknown or uninitialised column: 'DOI'.

Easy fix within the biblioformat function. The pulling of the doi information was looking for DOI. Think this needs to be lowercase for pulling it from the data object.

refs.dois <- unlist(lapply(refs.in, function(x) {
rcrossref::cr_works(query = x, limit = 1, sort = "score",
select = "DOI")$data$doi

function (refs = NULL, format = "text", style = "apa", filename = NULL, ...) { if (is.null(refs)) { refs.in <- clipr::read_clip() } else refs.in <- refs stopifnot(is.character(refs.in)) refs.dois <- unlist(lapply(refs.in, function(x) { rcrossref::cr_works(query = x, limit = 1, sort = "score", select = "DOI")$data$doi })) stopifnot(is.character(refs.dois)) refs.cit <- unlist(rcrossref::cr_cn(refs.dois, format = format, style = style, ...)) if (!is.null(filename)) writeLines(refs.cit, filename) clipr::write_clip(refs.cit, object_type = "character") invisible(refs.cit) }