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