|
%I #16 Jul 30 2015 22:55:49
%S 1,33,697,12033,185353,2657361,36306649,479622561,6184444585,
%T 78342273009,979414153081,12123907404609,148962749140297,
%U 1819935176767377,22139457629549593,268445978800100577
%N Expansion of 1/((1-4x)(1-8x)(1-9x)(1-12x)).
%H Vincenzo Librandi, <a href="/A028157/b028157.txt">Table of n, a(n) for n = 0..200</a>
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (33, -392, 1968, -3456).
%F a(0)=1, a(1)=33, a(2)=697, a(3)=12033, a(n)=33*a(n-1)-392*a(n-2)+ 1968*a(n-3)- 3456*a(n-4) [From Harvey P. Dale, Mar 01 2012]
%F a(n)=(5*12^(n+3)-32*9^(n+3)+30*8^(n+3)-3*4^(n+3))/480. [_Yahia Kahloune_, Jun 11 2013]
%t CoefficientList[Series[1/((1-4x)(1-8x)(1-9x)(1-12x)),{x,0,30}],x] (* or *) LinearRecurrence[{33,-392,1968,-3456},{1,33,697,12033},30] (* _Harvey P. Dale_, Mar 01 2012 *)
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_.
|
