그래프의 매개변수화

Mathematica 8은 광범위한 매개변수 그래프 콜렉션을 가지고 있습니다.
 In[1]:= Xstyle = {VertexStyle -> Directive[Hue[.6, .3, 1], EdgeForm[Hue[.6, .8, .7]]], VertexSize -> 0.25, EdgeStyle -> Hue[.6, .8, .5], ImageSize -> {125, 125}};
 In[2]:= Xtext[s_] := Style[s, 11, FontFamily -> "Verdana"];
 In[3]:= Xgraphs = {text[ButterflyGraph], text[CirculantGraph], text[CompleteGraph], text[CompleteGraph], ButterflyGraph[2, style], CirculantGraph[8, 3, style], CompleteGraph[8, style], CompleteGraph[{3, 2, 4}, EdgeStyle -> Hue[.6, .8, .7], style], text[CycleGraph], text[GridGraph], text[HararyGraph], text[HypercubeGraph], CycleGraph[8, style], GridGraph[{4, 5}, style], HararyGraph[5, 8, style], HypercubeGraph[3, style], text[KnightTourGraph], text[PetersenGraph], text[StarGraph], text[TuranGraph], KnightTourGraph[4, 4, style], PetersenGraph[6, 5, style], StarGraph[8, style], TuranGraph[7, 3, style], text[WheelGraph], text[KaryTree], text[CompleteKaryTree], text[PathGraph], WheelGraph[8, style], KaryTree[10, 3, style], CompleteKaryTree[3, 3, style], PathGraph[Range[20], style] };
 In[4]:= XGrid[Partition[graphs, 4, 4, {1, 1}, {}], Frame -> {All, {True, False, True, False, True, False, True, False}}, FrameStyle -> LightGray, Spacings -> {1, {{2, 1}}}]
 Out[4]=