if (requireNamespace("bibtex")) {
file <- system.file("Bib", "biblatexExamples.bib", package = "RefManageR")
BibOptions(check.entries = FALSE)
bib <- ReadBib(file)
tail(bib, 2, suppress.messages = FALSE)
bib <- head(bib, 1, suppress.messages = TRUE)
}
Run the code above in your browser using DataLab