A144627 Initial members of triples listed in A144625.

0, 1, 0, 0, 2, 1, 0, 1, 0, 0, 3, 2, 1, 0, 2, 1, 0, 1, 0, 0, 4, 3, 2, 1, 0, 3, 2, 1, 0, 2, 1, 0, 1, 0, 0, 5, 4, 3, 2, 1, 0, 4, 3, 2, 1, 0, 3, 2, 1, 0, 2, 1, 0, 1, 0, 0, 6, 5, 4, 3, 2, 1, 0, 5, 4, 3, 2, 1, 0, 4, 3, 2, 1, 0, 3, 2, 1, 0, 2, 1, 0, 1, 0, 0, 7, 6, 5, 4, 3, 2, 1, 0, 6, 5, 4, 3, 2, 1, 0

Offset

0,5

Links

Table of n, a(n) for n=0..98.

Maple

for n from 0 to 7 do
for k from 0 to n do for j from 0 to n do for i from 0 to n do if i+j+k=n then lprint(i, j, k); fi;
od: od: od: od:

Mathematica

DeleteCases[Flatten[Table[If[i+j+k==n, i], {n, 0, 10}, {k, 0, n}, {j, 0, n}, {i, 0, n}]], Null] (* Harvey P. Dale, Mar 27 2012 *)

Crossrefs

Sequence in context: A145765 A157424 A144961 * A135929 A346377 A338757

Adjacent sequences: A144624 A144625 A144626 * A144628 A144629 A144630

Keyword

nonn

Author

N. J. A. Sloane, Jan 18 2009

Status

approved