|
%I #30 Sep 08 2022 08:45:02
%S 7,85,301,751,1555,2857,4825,7651,11551,16765,23557,32215,43051,56401,
%T 72625,92107,115255,142501,174301,211135,253507,301945,357001,419251,
%U 489295,567757,655285,752551,860251,979105,1109857,1253275,1410151
%N Row 4 of A007754.
%H Seiichi Manyama, <a href="/A058795/b058795.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (5,-10,10,-5,1).
%F a(n) = n^4 + 10*n^3 + 32*n^2 + 35*n + 7.
%F G.f.: (5*x^4 - 26*x^3 + 54*x^2 - 50*x -7) / (x-1)^5. - _Colin Barker_, Jan 16 2013
%F E.g.f.: (7 + 78*x + 69*x^2 + 16*x^3 + x^4)*exp(x). - _G. C. Greubel_, Nov 29 2018
%t LinearRecurrence[{5,-10,10,-5,1},{7,85,301,751,1555},40] (* _Harvey P. Dale_, Dec 09 2015 *)
%t Table[n^4 + 10 n^3 + 32 n^2 + 35 n + 7, {n, 0, 40}] (* _Vincenzo Librandi_, Sep 22 2016 *)
%o (Magma) [n^4+10*n^3+32*n^2+35*n+7: n in [0..40]]; // _Vincenzo Librandi_, Sep 22 2016
%o (PARI) vector(40, n, n--; n^4+10*n^3+32*n^2+35*n+7) \\ _G. C. Greubel_, Nov 29 2018
%o (Sage) [(n^4+10*n^3+32*n^2+35*n+7) for n in range(40)] # _G. C. Greubel_, Nov 29 2018
%o (GAP) List([0..40], n -> n^4+10*n^3+32*n^2+35*n+7); # _G. C. Greubel_, Nov 29 2018
%Y Cf. A007754.
%K nonn,easy
%O 0,1
%A _Christian G. Bower_, Dec 02 2000
|
