Re: GraphSum ignores edge colors?

• To: mathgroup at smc.vnet.net
• Subject: [mg49722] Re: GraphSum ignores edge colors?
• From: sean_incali at yahoo.com (sean kim)
• Date: Thu, 29 Jul 2004 07:44:46 -0400 (EDT)
• References: <ce2g8p\$8t9\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```I have learned from the combinatorica website that the graphsum thing
is a kind of bug.

so there you go, I guess.

though it seems like there should be a way around it...

sean

sean_incali at yahoo.com (sean kim) wrote in message news:<ce2g8p\$8t9\$1 at smc.vnet.net>...
> hello group,
>
> How Come GraphSum ignores the color diretives for the edges that are
> defined by SetGraphOptions?
>
> How do I make a multigraph with the edge color directives intact? ( or
> any other directives for edges and vertices for that matter)
>
> And how come the g1,g2,g3 are shown as ...Graph:<3, 3, Undirected>-
>
> instead of Graph:<3, 3, Undirected>-  ?
>
>
>
> Thanks for any insights in advance
>
> sean
>
> code that was  ran. (thanks to Bob Hanlhon for the centering top most
> node)
>
> << DiscreteMath`Combinatorica`
> << Graphics`Graphics`
>
> g1 = SetGraphOptions[CompleteGraph[3], EdgeColor -> Red] /.
> ({x_?NumericQ, y_?NumericQ} :> {y, x})
> g2 = SetGraphOptions[ CompleteGraph[3], EdgeColor -> Blue] /.
> ({x_?NumericQ, y_?NumericQ} :> {y, x})
> g3 = GraphSum[g1, g2];
>
> p1 = ShowGraph[g1, DisplayFunction -> Identity];
> p2 = ShowGraph[g2, DisplayFunction -> Identity];
> p3 = ShowGraph[g3, DisplayFunction -> Identity];
>
> DisplayTogetherArray[p1, p2, p3 , DisplayFunction -> \$DisplayFunction]

```

• Prev by Date: Re: graphs and top most nodes
• Next by Date: Re: Using "Sum" (i = 1 ... N) in a function definition
• Previous by thread: GraphSum ignores edge colors?
• Next by thread: debugger woes with MathLink r12 on Windows: "The breakpoint will not currently be hit."