Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

GridBox Question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg84175] GridBox Question
  • From: John <jwa0 at lehigh.edu>
  • Date: Wed, 12 Dec 2007 19:58:00 -0500 (EST)

The cell listed below is in a notebook, and its evaluation created a
2x6 grid, which was filled with random integers.

Cell[GridBox[{Flatten[
     xxx = RandomInteger[
       MultinomialDistribution[100, {1/6, 1/6, 1/6, 1/6, 1/6, 1/6}],
       1]], Flatten[
     yyy = RandomInteger[
       MultinomialDistribution[100, {1/6, 1/6, 1/6, 1/6, 1/6, 1/6}],
       1]]}, GridFrame -> 2.1, GridFrameMargins -> {{2, 2}, {2, 2}},
   RowLines -> 1, ColumnLines -> 1] // DisplayForm, "Text",
 CellMargins -> {{Inherited + 200, Inherited}, {10, 10}}],

The 2x6 grid is a contingency table, and the analysis of it requires a
calculation that yields a single number, which I want to evaluate in a
subsequent cell. The values of xxx and yyy are needed to do the
calculation.

John



  • Prev by Date: Expanding powers of cosine
  • Next by Date: Role for print management
  • Previous by thread: Re: Expanding powers of cosine
  • Next by thread: Role for print management