Re: GraphPlot display anomaly
- To: mathgroup at smc.vnet.net
- Subject: [mg72388] Re: [mg72378] GraphPlot display anomaly
- From: Andrzej Kozlowski <akoz at mimuw.edu.pl>
- Date: Sun, 24 Dec 2006 03:40:12 -0500 (EST)
- References: <200612231114.GAA20908@smc.vnet.net>
On 23 Dec 2006, at 20:14, zac wrote:
> Hi All,
>
> try the followings with Mathematica 5.2:
>
>
> Needs["DiscreteMath`GraphPlot`"];
>
> GraphPlot[{1 -> 2},
> ImageSize -> {50, 50},
> DisplayFunction -> Evaluate[Display[$Display, #] &]
> ];
>
>
> Q1. Why does it produce two output graphics?
> Q2. Why does it not work without Evaluate[...]?
> Q3. Why does it work with simply using DisplayFunction ->
> $DisplayFunction?
>
> May it be that the implementation of option-passing was screwed up in
> DiscreteMath`Graphplot?
>
> Thanks,
>
> Istvan Zachar
The only problem is with your code. The correct way to do this is:
Needs["DiscreteMath`GraphPlot`"];
GraphPlot[{1 -> 2},
ImageSize -> {50, 50},
DisplayFunction -> (Display[$Display, #] &)
];
Note the crucial parentheses missing from original code.
I think the answers to all your questions should now be self-evident.
Andrzej Kozlowski
Tokyo, Japan
- References:
- GraphPlot display anomaly
- From: "zac" <replicatorzed@gmail.com>
- GraphPlot display anomaly