|
|
A020975
|
|
Expansion of 1/((1-7*x)*(1-11*x)*(1-12*x)).
|
|
1
|
|
|
1, 30, 607, 10344, 160189, 2335746, 32694859, 444486828, 5913240457, 77372622822, 999305059831, 12772807490352, 161880145667605, 2037329650638858, 25491080959642723, 317372095748963316, 3934768748483886433, 48606797206780217454, 598568489369669902735
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 23*a(n-1) - 132*a(n-2) + 7^n, a(0)=1, a(1)=30. - Vincenzo Librandi, Mar 15 2011
a(n) = 49*7^n/20 - 121*11^n/4 + 144*12^n/5. - R. J. Mathar, Jul 01 2013
|
|
MAPLE
|
seq(coeftayl(1/((1-7*x)*(1-11*x)*(1-12*x)), x = 0, k), k=0..17); # Muniru A Asiru, Feb 10 2018
|
|
MATHEMATICA
|
CoefficientList[Series[1/((1-7*x)*(1-11*x)*(1-12*x)), {x, 0, 50}], x] (* G. C. Greubel, Feb 09 2018 *)
|
|
PROG
|
(PARI) x='x+O('x^30); Vec(1/((1-7*x)*(1-11*x)*(1-12*x))) \\ G. C. Greubel, Feb 09 2018
(Magma) R<x>:=PowerSeriesRing(Integers(), 30); Coefficients(R!(1/((1-7*x)*(1-11*x)*(1-12*x)))); // G. C. Greubel, Feb 09 2018
(GAP) a:=[1, 30, 607];; for n in [4..17] do a[n]:=30*a[n-1]-293*a[n-2]+924*a[n-3]; od; a; # Muniru A Asiru, Feb 10 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|