Re: D&D Dice
- To: mathgroup at smc.vnet.net
- Subject: [mg37492] Re: [mg37457] D&D Dice
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Fri, 1 Nov 2002 01:43:44 -0500 (EST)
- References: <200210310940.EAA18264@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Try this:
In[1]:=
Apply[Plus,Table[i + i2 + i3, {i, 6}, {i2, 6}, {i3, 6}]]
Out[1]=
{{33,39,45,51,57,63},{39,45,51,57,63,69},{45,51,57,63,69,75},{51,57,63,69,75
,
81},{57,63,69,75,81,87},{63,69,75,81,87,93}}
Tomas Garza
Mexico City
----- Original Message -----
From: "AngleWyrm" <no_spam_anglewyrm at hotmail.com>
To: mathgroup at smc.vnet.net
Subject: [mg37492] [mg37457] D&D Dice
> Consider yer basic 3d6 stat roll: What are the possibilities?
> This gives a table of all 6^3 = 216 rolls:
>
> Table[i + i2 + i3, {i, 6}, {i2, 6}, {i3, 6}] // MatrixForm
>
> My question is this: How shall I set up a formula to list the count of
each
> total?
>
>
>