# NOT RUN {
# Create a new graph and
# add 2 different types of
# balanced trees of height
# 2 (branching twice) and
# different branching ratios
graph <-
create_graph() %>%
add_balanced_tree(
k = 2,
h = 2,
type = "binary") %>%
add_balanced_tree(
k = 3,
h = 2,
type = "tertiary")
# Get some node information
# from this graph
node_info(graph) %>%
head(5)
#> id type label deg indeg outdeg loops
#> 1 1 binary 1 2 0 2 0
#> 2 2 binary 2 3 1 2 0
#> 3 3 binary 3 3 1 2 0
#> 4 4 binary 4 1 1 0 0
#> 5 5 binary 5 1 1 0 0
# }
Run the code above in your browser using DataLab