[Date Index]
[Thread Index]
[Author Index]
Pascal's triangle spacing is off. Need DigitCount?
*To*: mathgroup at smc.vnet.net
*Subject*: [mg121183] Pascal's triangle spacing is off. Need DigitCount?
*From*: "Christopher O. Young" <cy56 at comcast.net>
*Date*: Sat, 3 Sep 2011 08:04:20 -0400 (EDT)
*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com
I'm trying to get the same spacing between the _center points_ of each of
the numbers in the Pascal triangle, so that each entry in a row is centered
properly underneath the corresponding two entries in the row above. Instead,
all the spacing options for Row[ ] seem to just apply to the spacings
between numbers.
It looks like I would have to calculate the length (i.e., number of digits)
of each entry as I go through the table. Is DigitCount the best function to
use here? I.e., won't slow things down too much? Or is there a faster way?
Thanks for any help.
Chris Young
cy56 at comcast.net
pascalTrngl2[n_] :=
Module[
{max, sp},
max = Max[Table[Binomial[n, j], {j, 0, n}]];
sp = Round[N[Log[10, max], 5]];
Column[
Table[
Row[
Table[Binomial[i, j], {j, 0, i}],
Invisible[sp]
],
{i, 0, n}
],
Center
]
]
Prev by Date:
**Mathematica collect function,**
Next by Date:
**Re: Output complex numbers in polar (exponential) form?**
Previous by thread:
**Re: Mathematica collect function,**
Next by thread:
**Re: Pascal's triangle spacing is off. Need DigitCount?**
| |