library(graph)

V1<-LETTERS[1:5]

edL<-vector("list",length = 5)

names(edL)<-V1

for(i in 1:5) edL[[i]]<-list(edges=c(2,3,4,5,1)[i])

print(edL)

print(c(2,3,4,5,1)[1])

G1<-new("graphNEL",nodes=V1,edgeL=edL);

1. print edL 時(shí) 輸出結(jié)果看不懂

2. G1<-new("graphNEL",nodes=V1,edgeL=edL); 這句執(zhí)行出現(xiàn)了如下的錯(cuò)誤