# NOT RUN {
write.pkgbib(c('rbibutils', 'utils', 'tools'), file='references')
bibs <- rbibutils::readBib('references.bib', "UTF-8")
write.pkgbib(bibs, 'references2.bib')
bibs2 <- rbibutils::readBib('references.bib', "UTF-8")
identical(bibs, bibs2)
# }
# NOT RUN {
# write to stdout()
write.pkgbib(c('rbibutils', 'utils', 'tools'), file=NULL)
# clean up
unlink(c('references.bib', 'references2.bib'))
# }
Run the code above in your browser using DataLab