I have this graph:
Graph[{a <-> 1, a <-> 2, a <-> 3, a <-> 4, b <-> 5, b <-> 6,
b <-> 7, b <-> 8, c <-> 9, c <-> 10, c <-> 11, c <-> 12, d <-> 13,
d <-> 14, d <-> 15, d <-> 16, a <-> b, a <-> c, a <-> d, b <-> c,
b <-> d, c <-> d, 1 <-> i, 2 <-> j, 3 <-> k, 4 <-> l, 5 <-> m,
6 <-> n, 7 <-> o, 8 <-> p, 9 <-> q, 10 <-> r, 11 <-> s, 12 <-> t,
13 <-> u, 14 <-> v, 15 <-> w, 16 <-> x, a <-> M, b <-> M, c <-> M,
d <-> M}
When the graph is generated in Mathematica, the node in the center of the graph (vertex M
) is placed above the point where the two edges a<->c
and b<->d
cross. This hides some information: it is not clear that {a,b,c,d}
are fully connected. How can I make Mathematica change the graphical position of M
?
GraphLayout
, e.g.CircularEmbedding
orDiscreteSpiralEmbedding
might be useful. $\endgroup$ – ciao May 22 '14 at 9:35