OFFSET
0
COMMENTS
Might be called Sierpinski's tetrahedron, by analogy with A047999.
The number of 1's in the n-th slice is A048883(n), 3^wt(n). - N. J. A. Sloane, Feb 14 2016
LINKS
R. J. Mathar, Table of n, a(n) for n = 0..5455
MAPLE
A268240 := proc(i, j, k)
modp(A046816(i, j, k), 2) ;
end proc:
seq(seq(seq(A268240(i, j, k), j=0..i), i=0..k), k=0..8);
# Another version from N. J. A. Sloane, Feb 14 2016:
MC:=(i, j, k) -> (i+j+k)!/(i!*j!*k!);
PT:=proc(n) local T, i, j, k; T:=0;
for i from n by -1 to 0 do
for j from n-i by -1 to 0 do lprint((MC(i, j, n-i-j) mod 2)); od: od: end;
for n from 0 to 8 do lprint("n=", n); PT(n); od:
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Benoit Cloitre and N. J. A. Sloane, Feb 05 2016
STATUS
approved