Re: subgraph error (errata)

*To*: mathgroup at smc.vnet.net*Subject*: [mg125864] Re: subgraph error (errata)*From*: Murta <rodrigomurtax at gmail.com>*Date*: Thu, 5 Apr 2012 05:52:00 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <jlh0l6$t5s$1@smc.vnet.net>

On Apr 4, 5:27 am, dan jack <dan.spect... at gmail.com> wrote: > I write an errata for the previous message: > > I obtain the error in this case: > > gg = Graph[{11 -> 2, 11 -> 3, 4 -> 11, 5-> 11, 11 -> 11}] > Subgraph[gg, 1 ->_ ] > > Join::headsd: Expression {11,2} at position 1 is expected to have head > List for all subexpressions through level 11. > DeleteDuplicates::list: List expected at position 1 in > DeleteDuplicates[Join[{11,2},{11,3},11]]. > > but not in this case: > gg = Graph[{1 -> 2, 1 -> 3, 4 -> 1, 5-> 1, 1-> 1}] > > so it seems that the only difference is the vertex number: 1 works but > 11 do not works ...very strange. > > Obviously the arrows are the correct Directed Edges (ESC de ESC)... > > any help or solidarity comment is appreciated :-) Very anoying!.. Just Wolfram Team to see that. I get intriged and made this test: sub[n_]:=Module[{gg=Graph[{n\[DirectedEdge]2,n\[DirectedEdge]3,4\ [DirectedEdge]n,5\[DirectedEdge]n,n\[DirectedEdge]n}]}, HighlightGraph[gg,Subgraph[gg,n\[DirectedEdge]_]]] sub[1] works and all others get error... Let's see another answers. best regards Murta