## Not run:
# library(magrittr)
#
# # Create three graphs
# graph_1 <-
# create_graph() %>%
# add_node("a") %>%
# add_node("b") %>%
# add_node("c") %>%
# add_edge("a", "c") %>%
# add_edge("a", "b") %>%
# add_edge("b", "c")
#
# graph_2 <-
# graph_1 %>%
# add_node("d") %>%
# add_edge("d", "c")
#
# graph_3 <-
# graph_2 %>%
# add_node("e") %>%
# add_edge("e", "b")
#
# # Create an empty graph series and add
# # the graphs
# series <-
# create_series() %>%
# add_to_series(graph_1, .) %>%
# add_to_series(graph_2, .) %>%
# add_to_series(graph_3, .)
#
# # View the second graph in the series in the Viewer
# render_graph_from_series(
# graph_series = series,
# graph_no = 2)
# ## End(Not run)
Run the code above in your browser using DataLab