huXuID(g, deg=NULL)
set.seed(987)
g <- randomEGraph(LETTERS[1:10], 0.3)
edgeDataDefaults(g, "bond") <- 1
edgeData(g, "B", "I", "bond") <- 2
edgeData(g, "A", "F", "bond") <- 1.5
nodeDataDefaults(g, "atom") <- 6
nodeData(g, "A", "atom") <- 8
huXuID(g)
Run the code above in your browser using DataLab