# NOT RUN {
# Create a random, directed graph with
# 18 nodes and 22 edges
graph <-
create_random_graph(
n = 18, m = 22,
set_seed = 23)
# Get the total degree distribution for
# the `random_graph` graph
graph %>%
get_degree_distribution(mode = "total")
#> degree total_degree_dist
#> 1 0 0.05555556
#> 2 1 0.22222222
#> 3 2 0.22222222
#> 4 3 0.22222222
#> 5 4 0.27777778
# }
Run the code above in your browser using DataLab