# NOT RUN {
# Create an undirected GNP
# graph with 100 nodes using
# a probability value of 0.05
gnp_graph <-
create_graph(
directed = FALSE) %>%
add_gnp_graph(
n = 100,
p = 0.05)
# Save the graph to disk; use
# the file name `gnp_graph.dgr`
save_graph(
x = gnp_graph,
file = "gnp_graph")
# To read the graph file from
# disk, use `open_graph()`
gnp_graph_2 <-
open_graph(
file = "gnp_graph.dgr")
# }
Run the code above in your browser using DataCamp Workspace