Pentahedral Graph

Author

Eric W. Weisstein
September 16, 2008

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

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

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

Additional Authors

Planar embeddings by
Ed Pegg, Jr.
March 2007

Graphs

v5.2

ShowGraphArray[RecognizeGraph/@PolyhedralGraphs[5],
VertexStyle->Disk[.06],
VertexColor->Red,
AspectRatio->Automatic]

v6

ShowGraphArray[Partition[CombinatoricaGraph/@GraphData["Polyhedral",5],7,7,{1,1},{}],ImageSize->500]

V7

GraphData["Polyhedral",5]

h=Select[GetGraphData[5],MemberQ[GetGraphData[#,"Classes"],"Polyhedral"]&]

Length[h]

GraphicsGrid[Partition[GraphPlot[GetGraph[#],Method->None,PlotLabel->TextCell[GetGraphData[#,"Name"],PageWidth->110,TextAlignment->Center],BaseStyle->{FontSlant->Italic}]&/@h,5,5,{1,1},{}],ImageSize->500]