login
A147659
Expansion of 1/(1-x-x^2-x^10+x^12).
1
1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 90, 146, 237, 385, 625, 1015, 1648, 2676, 4345, 7055, 11456, 18602, 30205, 49046, 79639, 129315, 209977, 340953, 553627, 898959, 1459697, 2370203, 3848649, 6249296, 10147379, 16476944, 26754661, 43443243
OFFSET
0,3
LINKS
Index entries for linear recurrences with constant coefficients, signature (1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1).
MATHEMATICA
f[x_] = 1 - x^2 - x^10 - x^11 + x^12;
g[x] = ExpandAll[x^12*f[1/x]]; a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
CoefficientList[Series[1/(1-x-x^2-x^10+x^12), {x, 0, 40}], x] (* Harvey P. Dale, May 31 2012 *)
CROSSREFS
Sequence in context: A074317 A077371 A077372 * A005181 A177376 A120659
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Nov 09 2008
STATUS
approved