login
A144768
a(n) = n! - n^9.
7
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
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
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Corrected offset from 9 to 0 and extended by Vincenzo Librandi, Oct 06 2011
STATUS
approved