R Notebook

Creating the environment

library(tosr)
library(bibliometrix)
library(igraph)

Uploading data

citation_network <- 
  tosr::tosr_load("DCA 467 15 July 2021 (1).bib",
                  "DCA 467 15 July 2021 (1).txt")

Data tidying

Adding full names

citation_network <- 
  citation_network$graph %>% 
  set_vertex_attr(name = "full_name",
                  value = citation_network$nodes)

Checking results

citation_network %>% summary()

IGRAPH 6de70fd DN-- 2842 8805 -- 
+ attr: name (v/c), subfield (v/n), full_name (v/x)

Exporting data

write.graph(citation_network, "citation_network.graphml", "graphml")