A289946 a(n) = Sum_{k=1..n} k!^6.

1, 65, 46721, 191149697, 2986175149697, 139317055679149697, 16390300280131775149697, 4296598745804900241599149697, 2283384320190476620685217983149697, 2283382306976051006261597069217983149697

Offset

1,2

Links

Seiichi Manyama, Table of n, a(n) for n = 1..104

Geoffrey Critzer, Combinatorics of Vector Spaces over Finite Fields, Master's thesis, Emporia State University, 2018. [This thesis cites this sequence entry, but it's just a typo: the intended sequence entry is A289546.]

Eric Weisstein's World of Mathematics, Factorial Sums

Mathematica

Table[Sum[k!^6, {k, n}], {n, 10}]
Accumulate[(Range[10]!)^6] (* Harvey P. Dale, May 14 2023 *)

Prog

(PARI) a(n) = sum(k=1, n, k!^6); \\ Michel Marcus, Jul 16 2017

Crossrefs

Cf. A007489 (k!), A104344 (k!^2), A289945 (k!^4).

Cf. A289947 (indices giving primes).

Sequence in context: A278550 A177652 A278795 * A219564 A183238 A103345

Adjacent sequences: A289943 A289944 A289945 * A289947 A289948 A289949

Keyword

nonn

Author

Eric W. Weisstein, Jul 16 2017

Status

approved