Parapluie Graph

Author

Eric W. Weisstein
May 13, 2008

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

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

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

Images

GraphData["ParapluieGraph","AllImages"]

GraphData

Subjects

GraphClassString["ParapluieGraph"]

Matrices

GraphDataMatrices["ParapluieGraph"]

Construction

ShowLabeledGraph[g=AddEdges[AddVertices[DeleteVertices[Graph[{"Wheel",7}],{1,2}],{{0,-1/2},{0,-1}}],{{5,6},{6,7}}]]

rg=RecognizeGraph[g]

ToCommonEdges[g,Graph[{7,388}]]