file_db <- system.file("extdata","example_database.csv",package = "bibliorefer")
separator <- ";"
input_date <- example_database(file_db, separator)
input_tam <- 100
extra_inf <- auxinf_autr(input_date,input_tam)
extra_inf
Run the code above in your browser using DataLab