Re: graphs and top most nodes
- To: mathgroup at smc.vnet.net
- Subject: [mg49723] Re: graphs and top most nodes
- From: sean_incali at yahoo.com (sean kim)
- Date: Thu, 29 Jul 2004 07:44:55 -0400 (EDT)
- References: <ce2flp$8p5$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
I'm kinda baffled at this code to be honest.
namely the
({x_?NumericQ, y_?NumericQ} :>{y, x})
I can't figure out what numeric_q is doing.
because if just go...
({x, y} :> {y, x})
it seems to do nothing
cooll thing was that,
({x_?NumericQ, y_?NumericQ} :>{y, -x})
will flip the picture upside down.
thanks in advance any insights
sean
BobHanlon at aol.com wrote in message news:<ce2flp$8p5$1 at smc.vnet.net>...
> Needs["DiscreteMath`Combinatorica`"];
>
>
> Table[Show[ShowGraph[CompleteGraph[n] ,
> DisplayFunction:>Identity] /.
> ({x_?NumericQ,y_?NumericQ}:>{y,x}),
> DisplayFunction->$DisplayFunction,
> PlotRange->All],{n,3,7}];
>
>
> Bob Hanlon
>
> > In a message dated Sun, 25 Jul 2004 07:15:57 +0000 (UTC),
> > sean_incali at yahoo.com writes:<< DiscreteMath`Combinatorica`
> >
> > ShowGraph[CompleteGraph[3]]
> > ShowGraph[CompleteGraph[4]]
> > ShowGraph[CompleteGraph[5]]
> > ShowGraph[CompleteGraph[6]]
> > ShowGraph[CompleteGraph[7]]
> >
> > shows 5 fully connected graphs.
> >
> > and it kinda suggests to me that there is no real rule for defining
> > the location of the the top most node? I mean, the top most node isn't
> > centered.
> >
> > how do I make it so that the top node is always at the center? is that
> > possible?
> >