Re: GraphicsGrid
- To: mathgroup at smc.vnet.net
- Subject: [mg82389] Re: [mg82352] GraphicsGrid
- From: DrMajorBob <drmajorbob at bigfoot.com>
- Date: Fri, 19 Oct 2007 04:56:34 -0400 (EDT)
- References: <9300338.1192718016047.JavaMail.root@m35>
- Reply-to: drmajorbob at bigfoot.com
GraphicsGrid[T] displays with no error, but GraphicsGrid[{T}] has the
problem you're talking about.
GraphicsGrid[{T}]//Trace shows that a LOT of work is going on behind the
scenes, and there seems to be a BUG imbedded in there somewhere. Use Find
on the string "1,1,2" and you'll find the Message, preceded by an attempt
to do something obscure, probably related to precise layout of the graphic
result.
Bobby
On Thu, 18 Oct 2007 03:53:36 -0500, Bruce Colletti <vze269bv at verizon.net >
wrote:
> Re 6.0.1 under WinXP.
>
> In the skeletal code below (actual code follows thereafter), the two
> GraphicsGrid commands produce the desired output. However, the second
> command also produces the error messages shown.
>
> Why do these messages appear? Thanks.
>
> Bruce
>
> X = an integer matrix;
> g = GraphPlot[ ...];
> GraphicsGrid[{{X, X, X}, g}]
>
> T = X;
> T[[1, 2]] = Item[T[[1, 2]], Background -> Red];
> GraphicsGrid[{{T, T, T}, g}]
>
> Thread::tdlen: Objects of unequal length in \
> {{1,1,1,2},{1,2,1,2},{1,3,1,2}}->{} cannot be combined. >>
>
> Part::partw: Part 2 of Graphics`GraphicsGridDump`CleanseRule[<<1>>] \
> does not exist. >>
>
> Set::pspec: Part specification {{1,1,1,2},{1,2,1,2},{1,3,1,2}} is \
> neither an integer nor a list of integers. >>
>
> ***** ACTUAL CODE *****
>
> n = 7;
> X = RandomInteger[{1, 9}, {n, n}];
> perms = {{{1, 2, 3}, {5, 6}}, {{2, 5, 1, 4, 3, 7, 6}}, {Range@4,
> Range[5, n]}};
>
> g = GraphPlot[convert[#, n], ImageSize -> 100, DirectedEdges -> True=
, =
> VertexLabeling -> True] & /@ perms;
>
> GraphicsGrid[{{X, X, X}, g}]
>
> T = X;
> T[[1, 2]] =
> Item[T[[1, 2]], Background -> Red];
>
> GraphicsGrid[{{T, T, T}, g}]
>
>
--
DrMajorBob at bigfoot.com