Cubic Nonplanar Graph

Author

Eric W. Weisstein
September 24, 2006

This notebook downloaded from https://mathworld.wolfram.com/notebooks/GraphTheory/CubicNonplanarGraph.nb.

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

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

Table

Sort[{GraphData[#,"Name"],GraphData[#,"VertexCount"]}&/@GraphData[{"Cubic","Nonplanar"}],Last[#1]<=Last[#2]&]//TableForm

Largest with given Diameter

FastIsomorphicSets[Append[CombinatoricaGraph/@GraphData[],LargestCubicNonplanarDiameter[3]]]

FastIsomorphicSets[Append[CombinatoricaGraph/@GraphData[],LargestCubicNonplanarDiameter[4]]]

Print[GraphDataString[{"LargestCubicNonplanarDiameter",#},LargestCubicNonplanarDiameter[#],120]]&/@{3,4}

{Length[l=HamiltonianCycle[LargestCubicNonplanarDiameter[4],All]]//Timing,l}

Length[hc]

Timing[LCF[Edges[LargestCubicNonplanarDiameter[4]],hc,All]]