Just as it says in the question. My networks have many parallel edges, for example, one has 18 vertices and 693 edges.
LpOTb.dc.rd <- list()
for (x in seq_len(1000L)) {
  LpOTb.dc.rd[[x]] <- erdos.renyi.game(18, 
                                       693,
                                       type = "gnm",
                                       loops = T)
}
I would like to make a random network to compare it to, but I keep getting an error message:
Error in erdos.renyi.game(18, 693, type = "gnm", loops = T) : 
At games.c:703 : Invalid number (too large) of edges, Invalid value
I would prefer not to simplify my networks and account for random edge weights, mostly because there's over 30 of them and I would have to redo all of my metrics for my networks.
 
    