View source: R/add_balanced_tree.R

add_balanced_tree | R Documentation |

With a graph object of class `dgr_graph`

, add a balanced tree to the graph.

```
add_balanced_tree(
graph,
k,
h,
type = NULL,
label = TRUE,
rel = NULL,
node_aes = NULL,
edge_aes = NULL,
node_data = NULL,
edge_data = NULL
)
```

`graph` |
A graph object of class |

`k` |
The branching factor for the tree. |

`h` |
The height of the tree. |

`type` |
An optional string that describes the entity type for the nodes to be added. |

`label` |
Either a vector object of length |

`rel` |
An optional string for providing a relationship label to all new edges created in the node tree. |

`node_aes` |
An optional list of named vectors comprising node aesthetic
attributes. The helper function |

`edge_aes` |
An optional list of named vectors comprising edge aesthetic
attributes. The helper function |

`node_data` |
An optional list of named vectors comprising node data
attributes. The helper function |

`edge_data` |
An optional list of named vectors comprising edge data
attributes. The helper function |

A graph object of class `dgr_graph`

.

```
# 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
graph %>%
get_node_info() %>%
head(5)
# Node and edge aesthetic and data
# attributes can be specified in
# the `node_aes`, `edge_aes`,
# `node_data`, and `edge_data`
# arguments
graph_w_attrs <-
create_graph() %>%
add_balanced_tree(
k = 2,
h = 2,
label = c(
"one", "two",
"three", "four",
"five", "six", "seven"),
type = c(
"a", "b", "b", "c",
"c", "c", "c"),
rel = "A",
node_aes = node_aes(
fillcolor = "steelblue"),
node_data = node_data(
value = c(
1.6, 2.8, 3.4, 8.3,
3.8, 5.2, 3.2)),
edge_aes = edge_aes(
color = "red",
penwidth = 1.2))
# Get the first three rows of
# the graph's node data frame
graph_w_attrs %>%
get_node_df() %>%
head(3)
# Get the first three rows of
# the graph's edge data frame
graph_w_attrs %>%
get_edge_df() %>%
head(3)
```

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.