I have generated a random network using the Erdos-Renyi game
g1 <- erdos.renyi.game(30, 0.15, type="gnp", directed = F)
Of cour
