 
 
 
 
 
 
Re: Graphic Entries in a Grid
- To: mathgroup at smc.vnet.net
- Subject: [mg93104] Re: Graphic Entries in a Grid
- From: John <jwa0 at lehigh.edu>
- Date: Sun, 26 Oct 2008 01:29:27 -0500 (EST)
- References: <gdrq8u$mn3$1@smc.vnet.net> <gdugcs$jrk$1@smc.vnet.net>
On Oct 25, 3:03 am, WetBlanket <Wyvern... at gmail.com> wrote:
> On Oct 24, 1:34 am, John <j... at lehigh.edu> wrote:
>
>
>
> > I want to  create a grid with some graphic entries. The graphics were
> > created as explained below:
>
> >    GraphicsGrid[{{"", "", ""}, {"", Graphics[Disk[], ImageSize -> 6=
],
> >    ""}, {"", "", ""}}, Frame -> True, Spacings -> {3, 3},
> >  Background -> Red]
>
> > By rearranging the disks in the above, it is possible to emulate all
> > six faces of a die.
>
> > I want the die faces to be entered in the left column and the top row
> > of the grid. All other entries are numbers.
>
> > My attempts to enter the die faces failed. Error message: not a list
> > of lists.
>
> > John
>
> If I understand what you mean, then try the following. First I created
> code for each of the six normal die faces using your technique. Then I
> named them: one,two, etc.
>
> I have used four in the code below.
>
> four = GraphicsGrid[{{Graphics[Disk[], ImageSize -> 6], "",
>     Graphics[Disk[], ImageSize -> 6]}, {"", "",
>     ""}, {Graphics[Disk[], ImageSize -> 6], "",
>     Graphics[Disk[], ImageSize -> 6]}}, Frame -> True,
>   Spacings -> {3, 3}, Background -> Red]
>
> GraphicsRow[{four, four, "4", "4"}]
>
> I hope this helps.
>
> Gary
Gary,
Thank you for your helpful advice. It works.
John

