Grid Graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg93042] Grid Graphics
- From: John <jwa0 at lehigh.edu>
- Date: Fri, 24 Oct 2008 02:32:31 -0400 (EDT)
Mathematica 6
Six die faces, each in two colors, created by using variations on the
following:
GraphicsGrid[{{"", "", ""}, {"", Graphics[Disk[], ImageSize -> 6],
""}, {"", "", ""}}, Frame -> True, Spacings -> {3, 3},
Background -> Red]
A 6 by 6 grid, created as follows:
Grid[Table[1/36, {i, 1, 6}, {j, 1, 6}], Frame -> All,
ItemStyle -> Directive[FontSize -> 24, Bold]]
I want to expand the 6 by 6 grid to a 7 by 7 grid. The last six column
headings should be the six red die faces, and the last six row
headings should be the six green die faces. The cell in the upper
left hand corner of the 7 by 7 grid is empty.
John