A144768 a(n) = n! - n^9.

1, 0, -510, -19677, -262120, -1953005, -10076976, -40348567, -134177408, -387057609, -996371200, -2318030891, -4680778752, -4377478573, 66517244416, 1269231008625, 20854070411264, 355568840219503, 6402175346437632, 121644777721134221, 2432901496176640000, 51090941377429393419

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..400

Mathematica

lst={}; k=9; Do[a=n!-n^k; AppendTo[lst, a], {n, k, 29}]; lst
Table[n!-n^9, {n, 0, 30}] (* Harvey P. Dale, Sep 18 2020 *)

Prog

(PARI) a(n)=n!-n^9 \\ Charles R Greathouse IV, Oct 05 2011
(Magma) [Factorial(n)-n^9: n in [0..20]]; // Vincenzo Librandi, Oct 06 2011

Crossrefs

Sequence in context: A196674 A260598 A255179 * A196289 A027494 A145588

Adjacent sequences: A144765 A144766 A144767 * A144769 A144770 A144771

Keyword

sign,easy

Author

Vladimir Joseph Stephan Orlovsky, Sep 20 2008

Extensions

Corrected offset from 9 to 0 and extended by Vincenzo Librandi, Oct 06 2011

Status

approved