library(ergm)
library(netplot)
n <- 50
n_egos <- 10
net <- as.network(matrix(0, ncol = n, nrow = n), directed = TRUE)
nplot(net)
# Error in quantile.default(netenv$vertex.size, 1 - netenv$vertex.label.show[1]) :
# missing values and NaN's not allowed if 'na.rm' is FALSE
