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