A196739 a(n) = n! - n^10.
1, 0, -1022, -59043, -1048552, -9765505, -60465456, -282470209, -1073701504, -3486421521, -9996371200, -25897507801, -61438362624, -131631471049, -202076363776, 731023977375, 19823278260224, 353671434195551, 6398803238501376, 121638969342574199, 2432891768176640000
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..400
Programs
-
Magma
[Factorial(n)-n^10: n in [0..20]];
-
Mathematica
Table[n!-n^10,{n,0,20}] (* Harvey P. Dale, May 19 2012 *)