install.pcakges("igraph")
install.packages("igraph")
library(igraph)
library(igraph)
st <- make_star(40)
st
tr <- make_tree(40, children = 3, mode = "undirected")
tr
er <- sample_gnm(n=100, m=40)
er
q()
