怎么用Mathematica绘制完全图？

电脑

Mathematica

给定单位圆上12个点。

求出这个点集的所有的2阶子集。

每一个2阶子集，对应于一条线段。画出这所有的线段。

把上面的过程，整合为一个函数——完全图（wqt）。

这样，可以直接画出6阶完全图。

批量绘制完全图。

从4阶完全图，到37阶完全图的交替动画。