Abx_Adherence

library(pacman)
p_load(tidyverse, bibliometrix)

pubmed1 <- convert2df("/Users/osx/Desktop/Abx/Data/R_Abx/pubmed_final.txt", dbsource = "pubmed", format = "pubmed") # import  data into R and name as "pubmed1"

## 
## Converting your pubmed collection into a bibliographic dataframe
## 
## Done!
## 
## 
## Generating affiliation field tag AU_UN from C1:  Done!

meshterm <- pubmed1 %>% select(TI, ID)

save(pubmed1, file="/Users/osx/Desktop/Abx/Data/R_Abx/pubmed_R") # save data "pubmed1" on folder R_Abx as name "pubmed_R"
write.table(pubmed1, file ="/Users/osx/Desktop/Abx/Data/R_Abx/pubmed_R.csv", sep = ",", row.names = F) # export the pubmed1 by the csv file