# NOT RUN {
data(scientometrics, package = "bibliometrixData")
years=c(2000)
nexus <- thematicEvolution(scientometrics,field="ID",years=years,n=100,minFreq=2)
#plotThematicEvolution(nexus$Nodes,nexus$Edges)
# }
Run the code above in your browser using DataLab