The code

e = {{Subscript["E",1,2],Subscript["E",2,3]} -> {Subscript["E",1,3]}};
v = {{Subscript["E",1,2]}, {Subscript["E",1,3]}, {Subscript["E",
    2,3]}, {Subscript["E",1,2], Subscript["E",2,3]}};
GraphPlot[Join[e, #->#& /@ v], VertexLabeling->True, 
 EdgeLabeling->False, DirectedEdges->True, SelfLoopStyle->False,
 VertexCoordinateRules -> ((#->{Length[#],Automatic})& /@ v)]

produces enter image description here, but clearly my input also specifies a vertex $\{E_{1,2}\}$. Where is it?

  • 1
    $\begingroup$ It is under E[2,3]:) $\endgroup$ – kglr Jun 3 '14 at 21:40
  • $\begingroup$ Well how can I achieve that the picture includes all vertices? $\endgroup$ – Leo Jun 3 '14 at 21:44
  • $\begingroup$ You can see all if you remove your VertexCoordinateRules; or replace Automatic with some numbers of your choice. $\endgroup$ – kglr Jun 3 '14 at 21:47
  • $\begingroup$ I need VertexCoordinateRules and replacing Automatic with concrete numbers is not possible, since I have a family of large graphs, parametrized by natural numbers, and I can't insert data for each of them. $\endgroup$ – Leo Jun 3 '14 at 21:53
  • 1
    $\begingroup$ this you may find useful. $\endgroup$ – kglr Jun 3 '14 at 22:27

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Browse other questions tagged or ask your own question.