write.bib(c("bibtex", "utils", "tools"), file = "references")
bibs <- read.bib("references.bib")
write.bib(bibs, "references2.bib")
md5 <- tools::md5sum(c("references.bib", "references2.bib"))
md5[1] == md5[2]
# \dontshow{
unlink(c("references.bib", "references2.bib"))
# }
Run the code above in your browser using DataLab