# NOT RUN {
# Create a new graph and set some global attributes
graph <-
create_graph() %>%
set_global_graph_attrs(
attr = "overlap",
value = "true",
attr_type = "graph")
# Clear all global attributes that have been set
graph <- clear_global_graph_attrs(graph)
# Look at the present global graph attributes;
# since there are none, NA is returned
get_global_graph_attrs(graph)
#> [1] NA
# }
Run the code above in your browser using DataLab