Re: GraphicsGrid
- To: mathgroup at smc.vnet.net
- Subject: [mg82397] Re: GraphicsGrid
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Fri, 19 Oct 2007 05:00:40 -0400 (EDT)
- References: <ff77gv$nfs$1@smc.vnet.net>
Hmmm,
you think that
GraphicsGrid[{{T, T, T}, g}]
generate a rectangular grid of 3 x 2
entries ??
Regards
Jens
Bruce Colletti 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}]
>