#Call the arquiwos_une function
file_db <- system.file("extdata","savedrecs.bib", package = "bibliorefer")
cabec_wos = TRUE
quoaspa_wos = ""
arquivos <- entrada_wos(file_db, cabec_wos, quoaspa_wos)
#Call the arquiwos_une function
base_arquiwos <- arquiwos_une(arquivos)
base_arquiwos
Run the code above in your browser using DataLab