OFFSET
0,4
COMMENTS
LINKS
G. C. Greubel, Rows n = 0..99 of triangle, flattened
EXAMPLE
Triangle begins:
0,
1, 1,
6, 7, 8,
6, 12, 19, 27,
0, 6, 18, 37, 64,
0, 0, 6, 24, 61, 125,
...
MATHEMATICA
T[n_, n_] := n^3; T[n_, k_] := T[n, k] = T[n, k + 1] - T[n - 1, k]; Table[T[n, k], {n, 0, 15}, {k, 0, n}] // Flatten (* G. C. Greubel, Jul 04 2018 *)
PROG
(PARI) T(n, k) = if (k==n, n^3, T(n, k+1) - T(n-1, k));
tabl(nn) = for (n=0, nn, for (k=0, n, print1(T(n, k), ", ")); print); \\ Michel Marcus, Jul 05 2018
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Reinhard Zumkeller, Jul 07 2009
STATUS
approved