# Example
# File of database
file_db <- system.file("extdata","compinst.csv", package = "gerefer")
separator <- ";"
# Parameters of the function
input_date <- example_database(file_db, separator)
input_tam <- 5
#Calls the function bookcap_bib
bookinstlister_bibtex <- bookinst_bib(input_date, input_tam)
bookinstlister_bibtex
Run the code above in your browser using DataLab