data(atlas)
atlas_graph <- ped_graph(atlas)
G <- igraph::graph_from_data_frame(d = atlas_graph$edges,
vertices = atlas_graph$vertices,
directed = TRUE)
Run the code above in your browser using DataLab