Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A289948
a(n) = Sum_{k=0..n} k!^3.
2
1, 2, 10, 226, 14050, 1742050, 374990050, 128399054050, 65676719822050, 47850402559694050, 47832576242431694050, 63649302669112063694050, 109966989623147836159694050, 241567605673714904675071694050, 662801328154821495670649599694050, 2236801993181528581580834681599694050
OFFSET
0,2
LINKS
MATHEMATICA
With[{nn = 16}, Table[Total@ Take[#, n], {n, nn}] &@ Table[k!^3, {k, 0, nn}]] (* Michael De Vlieger, Jul 16 2017 *)
Accumulate[(Range[0, 20]!)^3] (* Harvey P. Dale, Nov 30 2017 *)
PROG
(PARI) a(n) = sum(k=0, n, k!^3); \\ Michel Marcus, Jul 16 2017
CROSSREFS
Cf. A003422(n+1) (k!), A061062 (k!^2), this sequence (k!^3), A289949 (k!^4).
Sequence in context: A293148 A193482 A346222 * A282567 A360945 A308756
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jul 16 2017
STATUS
approved