powered by
rmSelfLoops(network)
graph <- makeNetwork(c("a","b","c","d","e","a"), c("b","c","d","e","e","e")) graph2 <- rmSelfLoops(graph) edges(graph) edges(graph2)
Run the code above in your browser using DataLab