# Create a graph and add 4 nodes
# in 2 separate function calls
graph <-
create_graph() %>%
add_n_nodes(
n = 2,
type = "a",
label = c("a_1", "a_2")) %>%
add_n_nodes(
n = 2,
type = "b",
label = c("b_1", "b_2"))
# Get the last nodes created (2 nodes
# from the last function call)
graph %>% get_last_nodes_created()
Run the code above in your browser using DataLab