# NOT RUN {
#Generate a test graph
g<-rgraph(20)
g[,4]<-0 #Create an isolate
g[4,]<-0
#Check for isolates
is.isolate(g,2) #2 is almost surely not an isolate
is.isolate(g,4) #4 is, by construction
# }
Run the code above in your browser using DataLab