MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

issues with GraphPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg99053] issues with GraphPlot
  • From: sean_incali at yahoo.com
  • Date: Sat, 25 Apr 2009 04:50:56 -0400 (EDT)

Hello group,

A few things that I just can't figure out.

1. EdgeRenderingFunction ignores edge labels.

GraphPlot[{{"B" -> "A" , "+"}, {"A" -> "B", "+"}},
 DirectedEdges -> True, VertexLabeling -> True,
 VertexRenderingFunction -> ({White, EdgeForm[Black], Disk[#, .05],
     Black, Text[#2, #1]} &), EdgeLabeling -> True,
 EdgeRenderingFunction -> ({ Arrowheads[Medium],
     Arrow[#1 , 0.07]} &), PlotStyle -> Thickness[0.005]]

2. As it is, above code produces a graph that is stretched
horizontally a bit too much. About the half the horizontal width works
better for me. How do I accomplish that? AspectRatio-> 1/GoldenRatio
doesn't work since disk gets stretch also.

3. For node A to appear on the left, "B"-> "A" has to be defined
first. If I reverse it, then the node B will appear on the left. What
is the reason for this?

Thanks in advance for any info.

Sean






  • Prev by Date: Re: Jacobi polynomials in Mathematica
  • Next by Date: Re: Jacobi polynomials in Mathematica
  • Previous by thread: Re: Is this solvable using Mathematica?
  • Next by thread: Re: issues with GraphPlot