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