这是我已经知道的代码:g<-erdos.renyi.game(1000,2000, type=c("gnm"))g2<-replicate(g,1000)#now I have sort of list with every graph实际上我试了很多:
g<-erdos.renyi.game(1026,2222,type=c("gnm")
Axiom ceq_transitivity: forall A, forall a b c:A, a¦b->b¦c->a¦c.(A) (@CEq A) symmetry proved by (@ceq_symmetry A) as ceq_rel.
Parameter CAdd: forall A, A-&g
trans <- lapply(graphs, function(graph) transitivity(graph, type = "local", vids=datanames))在转换成数字类型之后,我得到:
2) Error in .Call("R_igraph_transitivity_local_undirected