Disconnected Graph

Author

Eric W. Weisstein
May 31, 2004

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

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

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

Enumeration

Count[#,_?(!ConnectedQ[#]&)]&/@Graphs/@Range[9]//Timing

Length/@Graphs/@Range[9]-Length/@ConnectedGraphs/@Range[9]//Timing

disc=Select[#,!ConnectedQ[#]&]&/@Graphs/@Range[2,4];

ShowGraphArray[disc,VertexStyle->Disk[.1],GraphicsSpacing->.3]