1、比如下图,虽然代码里面显示,图应该是有向图,但结果却没有明确指定方向:GraphPlot[{1 -> 2, 2 -> 1, 3 -> 1, 3 -> 2, 8 -> 1, 8 -> 2, 8 -> 8}]
2、如果需要把图的方向画出来,需要用DirectedEdges->True来指定。GraphPlot[{1 -> 2, 2 -> 1, 3 -> 1, 3 -> 2, 8 -> 1, 8 -> 2, 8 -> 8},DirectedEdges -> True]DirectedEdges的意思是,有方向的边。
3、如果需要写出各顶点的标签,需要用VertexLabeling -> True来限制:GraphPlot[{1 -> 2, 2 幻腾寂埒-> 1, 3 -> 1, 3 -> 2, 8 -> 1, 8 -> 2, 8 -> 8}, DirectedEdges -> True, VertexLabeling -> True]VertexLabeling的意思是,标注顶点。
4、用下面的代码,可以为某一条边加上标签:GraphPlot[{1 -> 2, 2 -> 1, 3 -> 1, 3 -> 2, 8 -> 1, 8 -> 2, {8 -> 8,"8到8"}},DirectedEdges -> True, VertexLabeling -> True]
5、Mathematica可以轻松地绘制出一个36阶的完全图,感觉有点密集:GraphPlot[Table[1, {20}, {20}]]
6、所以,用EdgeRenderingFunction -> None取消边的绘制,只留下36个顶点:GraphPlot[Table[1, {20}, {20}], EdgeRenderingFunction -> None]