g <- graph.star(10)
E(g)$weight <- seq(ecount(g))
graph.strength(g)
graph.strength(g, mode="out")
graph.strength(g, mode="in")
# No weights, a warning is given
g <- graph.ring(10)
graph.strength(g)
Run the code above in your browser using DataCamp Workspace