# NOT RUN {
labels<-c("Corpus1","Corpus2")
# Build a bibliographical dataset from Scopus exports
db<-create_bibliography(corpora_files=c(tempfi1,tempfi2),
labels=labels, keywords=NA)
# }
# NOT RUN {
# Build graph
gr<-build_graph(db=db,small.year.mismatch=TRUE, attrs=c("Corpus","Year","Authors"), nb.cores=1)
# Compute Custom Modularity
compute_custom_modularity(gr, 1990, 2018)
# }
Run the code above in your browser using DataLab