if (require("jsonld") && interactive()) {
library("jsonld")
z <- system.file('extdata/citeproc.json', package = "handlr")
(tmp <- citeproc_reader(z))
if (requireNamespace("bibtex", quietly=TRUE)) {
(z <- system.file('extdata/bibtex.bib', package = "handlr"))
(tmp <- bibtex_reader(z))
rdf_xml_writer(z = tmp)
cat(rdf_xml_writer(z = tmp))
}
}
Run the code above in your browser using DataLab