|
%I #17 Sep 08 2022 08:45:38
%S 1,0,-510,-19677,-262120,-1953005,-10076976,-40348567,-134177408,
%T -387057609,-996371200,-2318030891,-4680778752,-4377478573,
%U 66517244416,1269231008625,20854070411264,355568840219503,6402175346437632,121644777721134221,2432901496176640000,51090941377429393419
%N a(n) = n! - n^9.
%H Vincenzo Librandi, <a href="/A144768/b144768.txt">Table of n, a(n) for n = 0..400</a>
%t lst={};k=9;Do[a=n!-n^k;AppendTo[lst,a],{n,k,29}];lst
%t Table[n!-n^9,{n,0,30}] (* _Harvey P. Dale_, Sep 18 2020 *)
%o (PARI) a(n)=n!-n^9 \\ _Charles R Greathouse IV_, Oct 05 2011
%o (Magma) [Factorial(n)-n^9: n in [0..20]]; // _Vincenzo Librandi_, Oct 06 2011
%K sign,easy
%O 0,3
%A _Vladimir Joseph Stephan Orlovsky_, Sep 20 2008
%E Corrected offset from 9 to 0 and extended by _Vincenzo Librandi_, Oct 06 2011
|
