ris_writer | R Documentation |
ris writer (Research Information Systems)
ris_writer(z)
z |
an object of class |
text if one RIS citation or list of many
RIS tags https://en.wikipedia.org/wiki/RIS_(file_format)
Other writers:
bibtex_writer()
,
cff_writer()
,
citeproc_writer()
,
codemeta_writer()
,
rdf_xml_writer()
,
schema_org_writer()
Other ris:
ris_reader()
# from a RIS file z <- system.file('extdata/crossref.ris', package = "handlr") tmp <- ris_reader(z) cat(ris_writer(z = tmp)) # peerj z <- system.file('extdata/peerj.ris', package = "handlr") tmp <- ris_reader(z) cat(ris_writer(z = tmp)) # plos z <- system.file('extdata/plos.ris', package = "handlr") tmp <- ris_reader(z) cat(ris_writer(z = tmp)) # elsevier z <- system.file('extdata/elsevier.ris', package = "handlr") tmp <- ris_reader(z) cat(ris_writer(z = tmp)) z <- system.file('extdata/citeproc.json', package = "handlr") res <- citeproc_reader(z) cat(ris_writer(z = res)) # many ## combine many RIS in a handl object z <- system.file('extdata/crossref.ris', package = "handlr") cr <- ris_reader(z) z <- system.file('extdata/peerj.ris', package = "handlr") prj <- ris_reader(z) c(cr, prj) # many bibtex to ris via c method if (requireNamespace("bibtex", quietly=TRUE)) { a <- system.file('extdata/bibtex.bib', package = "handlr") b <- system.file('extdata/crossref.bib', package = "handlr") aa <- bibtex_reader(a) bb <- bibtex_reader(a) (res <- c(aa, bb)) cat(ris_writer(res), sep = "\n\n") } ## manhy Citeproc to RIS z <- system.file('extdata/citeproc-many.json', package = "handlr") w <- citeproc_reader(x = z) ris_writer(w) cat(ris_writer(w), sep = "\n")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.