WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

TuranGraph[n,k]

n 個の頂点を持つ k 個に分裂したTuránグラフ を与える．

詳細とオプション
Details and Options Details and Options
例題  
例  
オプション  
AnnotationRules  
EdgeLabels  
EdgeShapeFunction  
Show More Show More
EdgeStyle  
EdgeWeight  
GraphHighlight  
GraphHighlightStyle  
GraphLayout  
PlotTheme  
基本的なテーマ  
特徴テーマ  
VertexCoordinates  
VertexLabels  
VertexShape  
VertexShapeFunction  
VertexSize  
VertexStyle  
VertexWeight  
アプリケーション  
特性と関係  
関連項目
関連するガイド
履歴
引用書式

TuranGraph

TuranGraph[n,k]

n 個の頂点を持つ k 個に分裂したTuránグラフ を与える．

詳細とオプション

例題

すべて開く すべて閉じる

例  (1)

頂点が5つの最初のいくつかのTuránグラフ：

Wolfram Language code: Table[TuranGraph[5, i, PlotLabel -> Subscript[T, 5, i]], {i, 2, 5}]

オプション  (80)

AnnotationRules  (3)

頂点の注釈を指定する：

Wolfram Language code: TuranGraph[5, 2, AnnotationRules -> {1 -> {VertexLabels -> "hello"}}]

辺の注釈を指定する：

Wolfram Language code: TuranGraph[5, 2, AnnotationRules -> {14 -> {EdgeLabels -> "hello"}}]

グラフそれ自体の注釈を指定する：

Wolfram Language code: TuranGraph[5, 2, AnnotationRules -> {"GraphProperties" -> {"Message" -> "hello"}}]
Wolfram Language code: AnnotationValue[%, "Message"]

EdgeLabels  (7)

辺14にラベルを付ける：

Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> {14 -> "Hello"}]

すべての辺に別々にラベルを付ける：

Wolfram Language code: el = EdgeList[TuranGraph[5, 3]]
Wolfram Language code: TuranGraph[5, 3, EdgeLabels -> Table[el[[i]] -> Subscript["e", i], {i, Length[el]}]]

任意の式をラベルとして使う：

Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> {14 -> [image], 24 -> [image], 35 -> [image]}]

Placedを記号位置と一緒に使って辺に沿ったラベルの置き方を制御する：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeLabels -> {35 -> Placed["■■■", p]}, PlotLabel -> p], {p, {"Start", "Middle", "End"}}]

明示的な座標を使ってラベルを置く：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeLabels -> {14 -> Placed["■■■", p]}, PlotLabel -> p, BaselinePosition -> Bottom], {p, {0, 1 / 4, 1 / 3}}]

ラベル内の位置を変える：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeLabels -> {14 -> Placed["■■■", {1 / 2, p}]}, PlotLabel -> p, BaselinePosition -> Bottom], {p, {{0, 0}, {1 / 2, 1 / 2}, {1, 1}}}]

複数のラベルを置く：

Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> {14 -> Placed[{"lbl1", "lbl2"}, {"Start", "End"}]}]
Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> {14 -> Placed[{"lbl1", "lbl2", "lbl3"}, {"Start", "Middle", "End"}]}]

TooltipとStatusAreaからの値で自動的にラベルを付ける：

Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> Placed["Name", Tooltip]]
Wolfram Language code: TuranGraph[5, 2, EdgeLabels -> Placed["Name", StatusArea]]

EdgeShapeFunction  (6)

EdgeShapeFunctionの組込み設定のリストを得る：

Wolfram Language code: ResourceData["EdgeShapeFunction"]

基線を含む無向辺：

Wolfram Language code: TuranGraph[5, 2, EdgeShapeFunction -> "Line"]

辺に異なるグリフを持つ線：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeShapeFunction -> {{ef, "ArrowSize" -> 0.1}}, PlotLabel -> ef], {ef, {"BoxLine", "DiamondLine", "DotLine"}}]

塗り潰された矢印を含む有向辺：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeShapeFunction -> {{ef, "ArrowSize" -> 0.1}}, PlotLabel -> ef], {ef, ResourceData["EdgeShapeFunction", "FilledArrow"]}]

線の矢印：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeShapeFunction -> {{ef, "ArrowSize" -> 0.1}}, PlotLabel -> ef], {ef, ResourceData["EdgeShapeFunction", "UnfilledArrow"]}]

塗り潰されていない矢印：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeShapeFunction -> {{ef, "ArrowSize" -> 0.1}}, PlotLabel -> ef], {ef, ResourceData["EdgeShapeFunction", "CarvedArrow"]}]

個別の辺に辺関数を指定する：

Wolfram Language code: TuranGraph[5, 2, EdgeShapeFunction -> {14 -> "DotLine"}]

別のデフォルトの辺関数と組み合せる：

Wolfram Language code: TuranGraph[5, 2, EdgeShapeFunction -> {14 -> "BoxLine", "DotLine"}]

プログラムを実行して辺を描画する：

Wolfram Language code: ef[pts_List, e_] := Block[{s = 0.015, g = [image]}, {Arrowheads[{{s, 0.33, g}, {s, 0.67, g}}], Arrow[pts]}]
Wolfram Language code: TuranGraph[5, 2, EdgeShapeFunction -> ef]

EdgeShapeFunctionはEdgeStyleと組み合せることができる：

Wolfram Language code: TuranGraph[5, 2, EdgeStyle -> Blue, EdgeShapeFunction -> (Line[#1]&)]

EdgeShapeFunctionはEdgeStyleより優先順位が高い：

Wolfram Language code: TuranGraph[5, 2, EdgeStyle -> Blue, EdgeShapeFunction -> ({Red, Line[#1]}&)]

EdgeStyle  (2)

すべての辺にスタイルを付ける：

Wolfram Language code: Table[TuranGraph[5, 2, EdgeStyle -> style, PlotLabel -> style], {style, {Gray, Dashed, Thick}}]

個々の辺にスタイルを付ける：

Wolfram Language code: TuranGraph[5, 2, EdgeStyle -> {14 -> Blue, 25 -> Dashed}]

EdgeWeight  (2)

すべての辺の重みを指定する：

Wolfram Language code: TuranGraph[5, 2, EdgeWeight -> RandomInteger[5, 6]]
Wolfram Language code: WeightedAdjacencyMatrix[%]//MatrixForm

任意の数式を重みとして使う：

Wolfram Language code: TuranGraph[5, 2, EdgeWeight -> {a, b, c, d, e, f}]
Wolfram Language code: WeightedAdjacencyMatrix[%]//MatrixForm

GraphHighlight  (3)

頂点1をハイライトする：

Wolfram Language code: TuranGraph[5, 2, VertexSize -> Medium, GraphHighlight -> {1}]

辺24をハイライトする：

Wolfram Language code: TuranGraph[5, 2, GraphHighlight -> {24}]

頂点と辺をハイライトする：

Wolfram Language code: TuranGraph[5, 2, VertexSize -> Medium, GraphHighlight -> {1, 2, 14, 15}]

GraphHighlightStyle  (2)

GraphHighlightStyleの組込み設定のリストを得る：

Wolfram Language code: ResourceData["GraphHighlightStyle"]

GraphHighlightStyleの組込み設定を使う：

Wolfram Language code: TuranGraph[5, 2, GraphHighlight -> {1, 14}, VertexSize -> Small, GraphHighlightStyle -> #, PlotLabel -> #]& /@ Select[ResourceData["GraphHighlightStyle"], # =!= Automatic&]

GraphLayout  (5)

デフォルトで，レイアウトは自動的に選ばれる：

Wolfram Language code: TuranGraph[5, 3, GraphLayout -> Automatic]

特殊な曲線の上のレイアウトを指定する：

Wolfram Language code: Table[TuranGraph[10, 4, GraphLayout -> l, PlotLabel -> l], {l, {"CircularEmbedding", "SpiralEmbedding"}}]

最適化の基準を満足するレイアウトを指定する：

Wolfram Language code: Table[TuranGraph[10, 4, GraphLayout -> l, PlotLabel -> l], {l, {"SpringEmbedding", "SpringElectricalEmbedding", "HighDimensionalEmbedding"}}]

VertexCoordinatesはGraphLayoutの座標を無効にする：

Wolfram Language code: {TuranGraph[5, 3, GraphLayout -> "SpringElectricalEmbedding"], TuranGraph[5, 3, GraphLayout -> "SpringElectricalEmbedding", VertexCoordinates -> Table[{i, i}, {i, 0, 4}]]}

AbsoluteOptionsを使ってレイアウトアルゴリズムで計算されたVertexCoordinatesを抽出する：

Wolfram Language code: TuranGraph[5, 3]
Wolfram Language code: AbsoluteOptions[%, VertexCoordinates]

PlotTheme  (4)

基本的なテーマ  (2)

一般的な基本テーマを使う：

Wolfram Language code: TuranGraph[5, 2, PlotTheme -> "Business"]

白黒のテーマを使う：

Wolfram Language code: TuranGraph[5, 2, PlotTheme -> "Monochrome"]

特徴テーマ  (2)

大きいグラフのテーマを使う：

Wolfram Language code: TuranGraph[5, 2, PlotTheme -> "LargeGraph"]

古典的な図表テーマを使う：

Wolfram Language code: TuranGraph[5, 2, VertexStyle -> LightDarkSwitched[RGBColor[1, 1, 0.85], GrayLevel[0.5]], PlotTheme -> "ClassicDiagram"]

VertexCoordinates  (3)

デフォルトで，任意の頂点座標が自動的に計算される：

Wolfram Language code: TuranGraph[5, 3]

AbsoluteOptionsを使って結果の頂点座標を抽出する：

Wolfram Language code: AbsoluteOptions[%, VertexCoordinates]

楕円に沿ったレイアウト関数を指定する：

Wolfram Language code: ellipseLayout[n_, {a_, b_}] := Table[{a Cos[2Pi / n u], b Sin[2Pi / n u]}, {u, 1, n}]
Wolfram Language code: Graphics[Point[ellipseLayout[10, {2, 1}]]]

これを使ってグラフの頂点座標を生成する：

Wolfram Language code: TuranGraph[10, 3, VertexCoordinates -> ellipseLayout[10, {2, 1}]]

VertexCoordinatesはGraphLayoutより優先順位が高い：

Wolfram Language code: TuranGraph[5, 3, VertexCoordinates -> Table[{i, i}, {i, 5}], GraphLayout -> "CircularEmbedding"]

VertexLabels  (13)

頂点名をラベルとして使う：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> "Name"]

個々の頂点にラベルを付ける：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> {2 -> "one"}]

すべての頂点にラベルを付ける：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Table[i -> Subscript[v, i], {i, 5}]]

任意の式をラベルとして使う：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> {1 -> [image], 2 -> [image], 3 -> [image]}]

Placedを記号位置と一緒に使って外側位置を含むラベルの置き方を制御する：

Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.1, VertexShapeFunction -> "Square", VertexLabels -> Table[i -> Placed["■■■", p], {i, 5}], PlotLabel -> p, ImagePadding -> 20], {p, {Before, After, Below, Above}}]

記号的外側コーナー位置：

Wolfram Language code: pl = {{Before, Below}, {After, Below}, {Before, Above}, {After, Above}};
Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.1, VertexShapeFunction -> "Square", ImagePadding -> 20, VertexLabels -> Table[i -> Placed["■■■", p], {i, 5}], PlotLabel -> p], {p, pl}]

記号的内側位置：

Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.55, VertexLabels -> Table[i -> Placed["■■■", p], {i, 5}], VertexShapeFunction -> "Square", PlotLabel -> p], {p, {Left, Top, Right, Bottom}}]

記号的内側コーナー位置：

Wolfram Language code: pl = {{Left, Bottom}, {Right, Bottom}, {Left, Top}, {Right, Top}};
Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.55, VertexShapeFunction -> "Square", VertexLabels -> Table[i -> Placed["■■■", p], {i, 5}], PlotLabel -> p], {p, pl}]

明示的な座標を使ってラベルの中心を置く：

Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.35, VertexShapeFunction -> "Square", VertexLabels -> Table[i -> Placed[[image], p], {i, 5}], PlotLabel -> p, BaselinePosition -> Bottom], {p, {{0, 0}, {1 / 2, 1 / 2}, {1, 1}}}]

すべてのラベルを頂点の右上コーナー位置に置き，ラベル内の座標を変化させる：

Wolfram Language code: Table[TuranGraph[5, 2, VertexSize -> 0.35, VertexShapeFunction -> "Square", VertexLabels -> Table[i -> Placed[[image], {{1, 1}, p}], {i, 5}], PlotLabel -> p, BaselinePosition -> Bottom], {p, {{0, 0}, {1 / 2, 1 / 2}, {1, 1}}}]

複数のラベルを置く：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> {1 -> Placed[{"lbl1", "lbl2"}, {Above, Below}]}]

任意の数のラベルを使うことができる：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> {1 -> Placed[{"lbl1", "lbl2", "lbl3", "lbl4"}, {Above, After, Below, Before}]}]

Placedの引数を使ってTooltipを含むフォーマットを制御する：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Placed["Name", Tooltip]]

あるいはStatusAreaを含むフォーマットを制御する：

Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Placed["Name", StatusArea]]

より高度なフォーマット関数を使う：

Wolfram Language code: rotateLabel[lab_] := Rotate[lab, 45Degree]
Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Table[i -> Placed["xxx", Below, rotateLabel], {i, 5}]]
Wolfram Language code: panelLabel[lab_] := Panel[lab, FrameMargins -> 0, Background -> Lighter[Yellow, 0.7]]
Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Table[i -> Placed["xxx", Center, panelLabel], {i, 5}]]
Wolfram Language code: hyperlinkLabel[lab_] := Hyperlink[lab, "http://www.wolfram.com"]
Wolfram Language code: TuranGraph[5, 3, VertexLabels -> Table[i -> Placed["xxx", Center, hyperlinkLabel], {i, 5}]]

VertexShape  (5)

Graphics，ImageあるいはGraphics3Dを頂点の形に使う：

Wolfram Language code: Table[TuranGraph[5, 3, VertexShape -> s, VertexSize -> Medium], {s, {[image], [image], [image]}}]

個々の頂点の形を指定する：

Wolfram Language code: TuranGraph[5, 3, VertexShape -> {2 -> [image]}, VertexSize -> Medium]

VertexShapeはVertexSizeと組み合せることができる：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, VertexShape -> [image], PlotLabel -> s], {s, {Small, Large}}]

VertexShapeはVertexStyleの影響を受けない：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexShape -> [image], VertexStyle -> Blue]

VertexShapeFunctionはVertexShapeより優先順位が高い：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexShapeFunction -> "Square", VertexShape -> [image]]

VertexShapeFunction  (10)

組込みのVertexShapeFunctionコレクションのリストを得る：

Wolfram Language code: ResourceData["VertexShapeFunction"]

"Basic"コレクションのVertexShapeFunctionの組込み設定を使う：

Wolfram Language code: ResourceData["VertexShapeFunction", "Basic"]

簡単な基本形：

Wolfram Language code: Table[TuranGraph[5, 3, VertexShapeFunction -> vf, VertexSize -> 0.2, PlotLabel -> vf], {vf, {"Triangle", "Square", "Rectangle", "Pentagon", "Hexagon", "Octagon"}}]

一般的な基本形：

Wolfram Language code: Table[TuranGraph[5, 3, VertexShapeFunction -> vf, VertexSize -> 0.2, PlotLabel -> vf], {vf, {"DownTrapezoid", "UpTrapezoid", "Parallelogram", "FiveDown", "Circle", "Diamond", "Star", "Capsule"}}]

"Rounded"コレクションのVertexShapeFunctionの組込み設定を使う：

Wolfram Language code: ResourceData["VertexShapeFunction", "Rounded"]
Wolfram Language code: Table[TuranGraph[5, 3, VertexShapeFunction -> vf, VertexSize -> 0.2, PlotLabel -> vf], {vf, ResourceData["VertexShapeFunction", "Rounded"]}]

"Concave"コレクションのVertexShapeFunctionの組込み設定を使う：

Wolfram Language code: ResourceData["VertexShapeFunction", "Concave"]
Wolfram Language code: Table[TuranGraph[5, 3, VertexShapeFunction -> vf, VertexSize -> 0.2, PlotLabel -> vf], {vf, ResourceData["VertexShapeFunction", "Concave"]}]

個々の頂点を描画する：

Wolfram Language code: TuranGraph[5, 3, VertexShapeFunction -> { 1 -> "Square"}, VertexSize -> 0.2]

デフォルトの頂点関数と組み合せる：

Wolfram Language code: TuranGraph[5, 3, VertexShapeFunction -> { 1 -> "Square", "Triangle"}, VertexSize -> 0.2]

定義済みのグラフィックスを使って頂点を描画する：

Wolfram Language code: TuranGraph[5, 3, VertexShapeFunction -> (Inset[[image], #]&)]

プログラムを実行して頂点を描画する：

Wolfram Language code: vf[{xc_, yc_}, name_, {w_, h_}] := Block[{xmin = xc - w, xmax = xc + w, ymin = yc - h, ymax = yc + h}, Polygon[{{xmin, ymin}, {xmax, ymax}, {xmin, ymax}, {xmax, ymin}}] ];
Wolfram Language code: TuranGraph[5, 3, VertexShapeFunction -> vf, VertexSize -> 0.2]

VertexShapeFunctionはVertexStyleと組み合せることができる：

Wolfram Language code: vf1[{xc_, yc_}, name_, {w_, h_}] := Rectangle[{xc - w, yc - h}, {xc + w, yc + h}]
Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexStyle -> Blue, VertexShapeFunction -> vf1]

VertexShapeFunctionはVertexStyleより優先順位が高い：

Wolfram Language code: vf2[{xc_, yc_}, name_, {w_, h_}] := {Red, Rectangle[{xc - w, yc - h}, {xc + w, yc + h}]}
Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexStyle -> Blue, VertexShapeFunction -> vf2]

VertexShapeFunctionはVertexSizeと組み合せることができる：

Wolfram Language code: TuranGraph[5, 3, VertexShapeFunction -> "Star", VertexSize -> {1 -> Small, Medium}]

VertexShapeFunctionはVertexShapeより優先順位が高い：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.3, VertexShapeFunction -> "Star", VertexShape -> [image]]

VertexSize  (8)

デフォルトで，頂点の大きさは自動的に計算される：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> Automatic]

記号的な頂点サイズを使ってすべての頂点の大きさを指定する：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, PlotLabel -> s], {s, {Tiny, Small, Medium, Large}}]

頂点座標間の最短距離との比を使う：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, PlotLabel -> s], {s, 0.1, 1, 0.3}]

すべての頂点座標に全体的な対角との比を使う：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> {"Scaled", s}, PlotLabel -> {"Scaled", s}], {s, 0.1, 1, 0.3}]

方向と 方向の両方の大きさを指定する：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, PlotLabel -> s], {s, {{0.1, 0.2}, {0.2, 0.1}}}]

個々の頂点の大きさを指定する：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> {1 -> 0.1, 2 -> 0.2}]

VertexSizeはVertexShapeFunctionと組み合せることができる：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, VertexShapeFunction -> "Square", PlotLabel -> s], {s, {0.05, 0.1, 0.2}}]

VertexSizeはVertexShapeと組み合せることができる：

Wolfram Language code: Table[TuranGraph[5, 3, VertexSize -> s, VertexShape -> [image], PlotLabel -> s], {s, {0.1, 0.2, 0.4}}]

VertexStyle  (5)

すべての頂点にスタイルを付ける：

Wolfram Language code: Table[TuranGraph[5, 3, VertexStyle -> style, VertexSize -> 0.2, PlotLabel -> style], {style, {Yellow, EdgeForm[Dashed]}}]

個々の頂点にスタイルを付ける：

Wolfram Language code: TuranGraph[5, 3, VertexStyle -> {1 -> Blue, 2 -> Red}, VertexSize -> Medium]

VertexShapeFunctionはVertexStyleと組み合せることができる：

Wolfram Language code: vf1[{xc_, yc_}, name_, {w_, h_}] := Rectangle[{xc - w, yc - h}, {xc + w, yc + h}]
Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexStyle -> Blue, VertexShapeFunction -> vf1]

VertexShapeFunctionはVertexStyleより優先順位が高い：

Wolfram Language code: vf2[{xc_, yc_}, name_, {w_, h_}] := {Red, Rectangle[{xc - w, yc - h}, {xc + w, yc + h}]}
Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexStyle -> Blue, VertexShapeFunction -> vf2]

VertexStyleはBaseStyleと組み合せることができる：

Wolfram Language code: TuranGraph[5, 3, VertexStyle -> LightBlue, BaseStyle -> EdgeForm[Dotted], VertexSize -> 0.2]

VertexStyleはBaseStyleより優先順位が高い：

Wolfram Language code: TuranGraph[5, 3, VertexStyle -> LightBlue, BaseStyle -> Gray, VertexSize -> 0.2]

VertexShapeはVertexStyleの影響を受けない：

Wolfram Language code: TuranGraph[5, 3, VertexSize -> 0.2, VertexShape -> [image], VertexStyle -> Blue]

VertexWeight  (2)

全頂点の重みを設定する：

Wolfram Language code: TuranGraph[5, 3, VertexWeight -> {2, 3, 4, 5, 6}]
Wolfram Language code: AnnotationValue[{%, 1}, VertexWeight]

任意の数式を重みとして使う：

Wolfram Language code: TuranGraph[5, 3, VertexWeight -> {a, b, c, d, e}]
Wolfram Language code: AnnotationValue[{%, 1}, VertexWeight]

アプリケーション  (7)

n 組のカップルがパーティーに行くとする．各人が自分のパートナー以外のすべての人と握手をするとすると，TuranGraph[2n,n]で行われる握手の回数が説明できる：

Wolfram Language code: {TuranGraph[4, 2], TuranGraph[6, 3]}

TuránグラフのGraphCenter：

Wolfram Language code: Table[HighlightGraph[#, GraphCenter[#]]&[TuranGraph[5, i, VertexSize -> 0.2]], {i, 2, 4}]

GraphPeriphery：

Wolfram Language code: Table[HighlightGraph[#, GraphPeriphery[#]]&[TuranGraph[5, i, VertexSize -> 0.2]], {i, 2, 4}]

VertexEccentricity：

Wolfram Language code: VertexEccentricity[TuranGraph[5, 3], #]& /@ VertexList[CycleGraph[5]]

頂点離心率経路をハイライトする：

Wolfram Language code: FindVertexEccentricityPath[g_ ? UndirectedGraphQ, u_] /; MemberQ[VertexList[g], u] := Module[{d = GraphDistanceMatrix[g], posu, posv, vl = VertexList[g]}, posu = VertexIndex[g, u]; posv = First@First@Position[d[[posu]], Max[d[[posu]]]]; PathGraph[FindShortestPath[g, u, vl[[posv]]]]]
Wolfram Language code: Table[HighlightGraph[g = TuranGraph[5, 3], FindVertexEccentricityPath[g, u]], {u, Range[3]}]

GraphRadius：

Wolfram Language code: Table[GraphRadius[TuranGraph[5, i]], {i, 2, 4}]

半径経路をハイライトする：

Wolfram Language code: FindRadiusPath[g_ ? UndirectedGraphQ] := Module[{c = First@GraphCenter[g], d, v, pos}, d = Table[GraphDistance[g, c, u], {u, VertexList[g]}]; pos = First@Position[d, Max[d]]; v = First@Part[VertexList[g], pos]; PathGraph[FindShortestPath[g, c, v]]]
Wolfram Language code: Table[HighlightGraph[#, FindRadiusPath[#]]&[TuranGraph[5, i, VertexSize -> Tiny]], {i, 2, 4}]

GraphDiameter：

Wolfram Language code: Table[GraphDiameter[TuranGraph[5, i]], {i, 2, 4}]

直径経路をハイライトする：

Wolfram Language code: FindDiameterPath[g_ ? UndirectedGraphQ] := Module[{d = GraphDistanceMatrix[g], u, v, pos}, pos = First@Position[d, Max[d]]; {u, v} = Part[VertexList[g], pos]; PathGraph[FindShortestPath[g, u, v]]]
Wolfram Language code: Table[HighlightGraph[#, FindDiameterPath[#]]&[TuranGraph[5, i, VertexSize -> Tiny]], {i, 2, 4}]

TuranGraphの頂点次数をハイライトする：

Wolfram Language code: HighlightCentrality[g_, cc_] := HighlightGraph[g, Table[Style[VertexList[g][[i]], ColorData["TemperatureMap"][cc[[i]] / Max[cc]]], {i, VertexCount[g]}]];
Wolfram Language code: g = TuranGraph[8, 3, VertexSize -> Large];
Wolfram Language code: HighlightCentrality[g, VertexDegree[g]]

接近中心性をハイライトする：

Wolfram Language code: HighlightCentrality[g, ClosenessCentrality[g]]

固有ベクトル中心性をハイライトする：

Wolfram Language code: HighlightCentrality[g, EigenvectorCentrality[g]]

特性と関係  (4)

TuranGraph[n,r]には n 頂点ある：

Wolfram Language code: VertexCount[TuranGraph[n, r]]

頂点の関数としての辺の数：

Wolfram Language code: DiscretePlot[EdgeCount[TuranGraph[n, 5]], {n, 3, 25}, AxesOrigin -> {0, 0}]

CompleteGraphはTuranGraphの特殊ケースである：

Wolfram Language code: Table[TuranGraph[5, i], {i, 2, 5}]
Wolfram Language code: { CompleteGraph[{3, 2}], CompleteGraph[{2, 2, 1}], CompleteGraph[{2, 1, 1, 1}], CompleteGraph[5]}

TuranGraph[n,2]は完全二部グラフである：

Wolfram Language code: TuranGraph[7, 2]
Wolfram Language code: BipartiteGraphQ[%]
Wolfram Research (2010), TuranGraph, Wolfram言語関数， https://reference.wolfram.com/language/ref/TuranGraph.html.

テキスト

Wolfram Research (2010), TuranGraph, Wolfram言語関数， https://reference.wolfram.com/language/ref/TuranGraph.html.

CMS

Wolfram Language. 2010. "TuranGraph." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/TuranGraph.html.

APA

Wolfram Language. (2010). TuranGraph. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/TuranGraph.html

BibTeX

@misc{reference.wolfram_2026_turangraph, author="Wolfram Research", title="{TuranGraph}", year="2010", howpublished="\url{https://reference.wolfram.com/language/ref/TuranGraph.html}", note=[Accessed: 03-November-2026]}

BibLaTeX

@online{reference.wolfram_2026_turangraph, organization={Wolfram Research}, title={TuranGraph}, year={2010}, url={https://reference.wolfram.com/language/ref/TuranGraph.html}, note=[Accessed: 03-November-2026]}