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()