# NOT RUN {
x <- net.erdos.renyi.gnp(1000, 0.01)
## Plot the standard degree distribution of x.
degree.dist(x, cumulative = FALSE, log = FALSE)
## Plot the degree distribution of x, with a logarithm scale.
degree.dist(x, cumulative = FALSE, log = TRUE)
## Plot the cumulative degree distribution of x.
degree.dist(x, cumulative = TRUE, log = FALSE)
## Plot the cumulative degree distribution of x, with a logarithm scale.
degree.dist(x, cumulative = TRUE, log = TRUE)
# }
Run the code above in your browser using DataLab