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? > >