#Call the convert_bibliowos 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 convert_bibliowos function
font_wos <- convert_bibliowos(arquivos)
font_wos
Run the code above in your browser using DataLab