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
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..400
Programs
-
Magma
[Factorial(n)-n^9: n in [0..20]]; // Vincenzo Librandi, Oct 06 2011
-
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 *) -
PARI
a(n)=n!-n^9 \\ Charles R Greathouse IV, Oct 05 2011
Extensions
Corrected offset from 9 to 0 and extended by Vincenzo Librandi, Oct 06 2011