|
%I #14 Sep 08 2022 08:45:49
%S 0,1,33024,21533202,2147614720,76294921875,1410559992576,
%T 16616485461604,140737555464192,926510288136165,5000000500000000,
%U 22974866110759926,92442132027408384,332708309893839607,1088976679235208960
%N a(n) = n^9*(n^7 + 1)/2.
%H Vincenzo Librandi, <a href="/A170789/b170789.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Rec#order_17">Index entries for linear recurrences with constant coefficients</a>, signature (17,-136,680,-2380,6188,-12376,19448,-24310,24310,-19448,12376,-6188,2380,-680,136,-17,1).
%F G.f.: (x + 33007*x^2 + 20971930*x^3 + 1786040870*x^4 + 42691533167*x^5 +
%F 391057936193*x^6 + 1603741633836*x^7 + 3191398997460*x^8 + 3191399928015*x^9 + 1603741544321*x^10 + 391057582106*x^11 + 42691705382*x^12 + 1786044385*x^13 + 20960815*x^14 + 32512*x^15)/(1-x)^17. - _G. C. Greubel_, Dec 06 2017
%t Table[n^9*(n^7+1)/2, {n,0,30}] (* _G. C. Greubel_, Dec 06 2017 *)
%t LinearRecurrence[{17,-136,680,-2380,6188,-12376,19448,-24310,24310,-19448,12376,-6188,2380,-680,136,-17,1},{0,1,33024,21533202,2147614720,76294921875,1410559992576,16616485461604,140737555464192,926510288136165,5000000500000000,22974866110759926,92442132027408384,332708309893839607,1088976679235208960,3284204197078125000,9223372071214514176},20] (* _Harvey P. Dale_, Nov 21 2020 *)
%o (Magma) [n^9*(n^7+1)/2: n in [0..20]]; // _Vincenzo Librandi_, Aug 26 2011
%o (PARI) for(n=0,30, print1(n^9*(n^7+1)/2, ", ")) \\ _G. C. Greubel_, Dec 06 2017
%K nonn,easy
%O 0,3
%A _N. J. A. Sloane_, Dec 11 2009
|
