MathGroup Archive 2006

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

Search the Archive

RE: Re: GraphPlot display anomaly

  • To: mathgroup at smc.vnet.net
  • Subject: [mg72401] RE: [mg72388] Re: [mg72378] GraphPlot display anomaly
  • From: "David Park" <djmp at earthlink.net>
  • Date: Mon, 25 Dec 2006 04:52:32 -0500 (EST)

I tried it also on 5.1 in Windows98 and it also crashed there. It does not
crash if there is a complete cycle. The following works properly in 5.1 and
5.2.

Needs["DiscreteMath`GraphPlot`"];

GraphPlot[{1 -> 2, 2 -> 3, 3 -> 4, 4 -> 5, 5 -> 6, 6 -> 7, 7 -> 8, 8 -> 1},
    EdgeStyleFunction -> (Arrow[{#1, #2}] &)];

The following crashes in both versions.

GraphPlot[{1 -> 2, 2 -> 3, 3 -> 4, 4 -> 5, 5 -> 6, 6 -> 7, 7 -> 8},
    EdgeStyleFunction -> (Arrow[{#1, #2}] &)];

I wonder if anyone else with Windows has this problem?

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/



From: Andrzej Kozlowski [mailto:akoz at mimuw.edu.pl]
Subject: [mg72401] Re: [mg72388] Re: [mg72378] GraphPlot display anomaly

Everything works without a glitch here, but I only have:

$Version

5.1 for Mac OS X (October 25, 2004)

Andrzej Kozlowski

On 25 Dec 2006, at 01:09, David Park wrote:

> Whenever I try to evaluate that statement, or the original posters
> statement, or any GraphPlot statement that doesn't have a complete
> cycle, my
> Mathematica 5.2 crashes!
>
> For example, the following statement that deletes a number of edges
> from the
> example in Help crashes.
>
> Needs["DiscreteMath`GraphPlot`"];
>
> GraphPlot[{1 -> 2, 2 -> 3, 3 -> 4, 4 -> 5, 5 -> 6, 6 -> 7, 7 -> 8},
>     EdgeStyleFunction -> (Arrow[{#1, #2}] &)];
>
> crash!
>
> David Park
> djmp at earthlink.net
> http://home.earthlink.net/~djmp/
>
> From: Andrzej Kozlowski [mailto:akoz at mimuw.edu.pl]
>
> On 23 Dec 2006, at 20:14, zac wrote:
>
>
> 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
>
>



  • Prev by Date: Re: Any simple way to flatten all but the bottom level?
  • Next by Date: [Admin] Missing posts
  • Previous by thread: Re: Re: GraphPlot display anomaly
  • Next by thread: Re: terminate the NestWhile