|
%I #12 Mar 08 2021 12:20:13
%S 0,1,4,48,320,2816,21504,176128,1392640,11206656,89391104,716177408,
%T 5725224960,45818576896,366481506304,2932120485888,23455890145280,
%U 187651416129536,1501194149167104,12009621912813568,96076700424601600
%N Expansion of x/((1+4x)(1-8x)).
%C A091904(n)=A091905(n+1)/50.
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (4,32).
%F a(n)=8^n/12-(-4)^n/12
%F a(0)=0, a(1)=1, a(n)=4*a(n-1)+32*a(n-2). - _Harvey P. Dale_, May 06 2014
%F a(n)=4^(n-1)*A001045(n+1). - _R. J. Mathar_, Mar 08 2021
%t Join[{a=0,b=1},Table[c=4*b+32*a;a=b;b=c,{n,30}]] (* _Vladimir Joseph Stephan Orlovsky_, Apr 22 2011 *)
%t CoefficientList[Series[x/((1+4x)(1-8x)),{x,0,30}],x] (* or *) LinearRecurrence[{4,32},{0,1},30] (* _Harvey P. Dale_, May 06 2014 *)
%K easy,nonn
%O 0,3
%A _Paul Barry_, Feb 10 2004
|
