|
%I #14 Jun 20 2015 09:18:15
%S 1,2,3,4,5,15,29,56,109,214,423,831,1633,3210,6311,12408,24393,47955,
%T 94277,185344,364377,716346,1408299,2768643,5443009,10700674,21036971,
%U 41357596,81306893,159845143,314247277,617793880,1214550789,2387743982
%N Pentanacci numbers: a(n)=a(n-1)+a(n-2)+a(n-3)+a(n-4)+a(n-5), {1,2,3,4,5...}.
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,1,1,1).
%F G.f.: x*(-1-x+2*x^3+5*x^4)/(-1+x+x^2+x^3+x^4+x^5). [Maksym Voznyy (voznyy(AT)mail.ru), Aug 12 2009]
%t a=1;b=2;c=3;d=4;e=5;lst={a,b,c,d,e};Do[f=a+b+c+d+e;AppendTo[lst,f];a=b;b=c;c=d;d=e;e=f,{n,5!}];lst
%t LinearRecurrence[{1,1,1,1,1},Range[5],40](* _Harvey P. Dale_, Jun 20 2015 *)
%K nonn
%O 1,2
%A _Vladimir Joseph Stephan Orlovsky_, Sep 30 2008
%E G.f. proposed by Maksym Voznyy checked and corrected by _R. J. Mathar_, Sep 16 2009
|
