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

My Button Doesn't Work

• To: mathgroup at smc.vnet.net
• Subject: [mg84256] My Button Doesn't Work
• From: John <jwa0 at lehigh.edu>
• Date: Sun, 16 Dec 2007 05:37:28 -0500 (EST)

My notebook includes the cell shown below. Evaluation of the notebook
prints a button, and the button is labeled Simulate, but clicking on
the button doesn't print the  six simulated numbers.

No error messages, but ButtonEvaluator is printed in red.

Cell[ButtonBox["Simulate", Active -> True,
   ButtonFunction ->
    Print[RandomInteger[
      MultinomialDistribution[100, {1/6, 1/6, 1/6, 1/6, 1/6, 1/6}],
      1]], ButtonEvaluator -> Automatic] // DisplayForm],

Is it possible for the six simulated numbers to be printed in a grid
of dimension 1x6?

John