powered by
energy(g)
library(graph) set.seed(123) g <- randomEGraph(as.character(1:6), 0.35) energy(g)
Run the code above in your browser using DataLab