|
| |
|
| A326226飞机 |
| 未标记的n顶点哈密顿有向图的数量（带循环）。 |
|
10
|
| |
|
|
|
抵消
|
0,2
|
|
|
评论
|
如果一个有向图包含通过每个顶点一次的有向循环，则该有向图就是哈密顿图。
|
|
|
链接
|
|
|
|
例子
|
a（2）=3个有向图边集的非同构表示：
{12,21}
{11,12,21}
{11,12,21,22}
|
|
|
数学
|
dinorm[m_]：=If[m=={}，{}；If[Union@@m！=Range[Max@@Flatten[m]]，dinorm[m/.应用[Rule，Table[{（Union@@m）[[i]]，i}，｛i，Length[Union@m]}]，{1}]]，First[Sort[dinorm[m，1]]]]；
dinorm[m，aft_]：=If[Length[Union@@m]<=aft，{m｝，With[｛mx=Table[Count[m，i，｛2｝]，｛i，Select[Union@@m，#1>=aft&]｝]｝，Union@@（dinorm[#1，aft+1]&）/@Union[Table[Map[Sort，m/.｛par+aft-1->aft，aft->par+aft-1}，｛0｝]，｛par，First/@Position[mx，Max[mx]]｝]]]；
表[Length[Select[Union[dinorm/@Subsets[Tuples[Range[n]，2]]，FindHamiltonianCycle[Graph[Range=n]，DirectedEdge@@@#]]={}&]]，{n，0，4}]（*Mathematica 8.0+。警告：使用HamiltonianGraphQ而不是FindHamiltoniceCycle返回一个（4）=867，这是不正确的*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,坚硬的,更多
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
