Strongly Connected Digraph

Author

Eric W. Weisstein
June 3, 2004

This notebook downloaded from http://mathworld.wolfram.com/notebooks/GraphTheory/StronglyConnectedDigraph.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/StronglyConnectedDigraph.html.

©2005 Wolfram Research, Inc. except for portions noted otherwise

Counts

Length/@Table[Select[Digraphs[n],ConnectedQ[#,Strong]&],{n,5}]//Timing

Show[GraphicsArray[partition[showGraph[#,Directed,PlotStyles->{PointSize[.1]}]&/@Select[Digraphs[3],ConnectedQ[#,Strong]&],7]]]