#Running document-level matching procedure
biblioverlap_results <- biblioverlap(ufrj_bio_0122[1:2])
#Checking biblioverlap results (db_list)
lapply(biblioverlap_results$db_list, head, n=1)
#Plotting the UpSet plot
plot_upset(biblioverlap_results$db_list)
Run the code above in your browser using DataLab