OFFSET
0,5
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..500
MATHEMATICA
a[0] = 0; a[n_] := a[n] = n^3 + a[n - 1];
b[0] = 1; b[n_] := b[n] = n^3*b[n - 1];
Flatten[Table[{a[n], b[n]}, {n, 0, 15}]]
PROG
(Magma) &cat[[(n*(n+1)/2)^2, Factorial(n)^3]: n in [0..15]]; // Vincenzo Librandi, Sep 07 2016
CROSSREFS
KEYWORD
nonn,easy,less
AUTHOR
Roger L. Bagula, Jan 05 2009
STATUS
approved