A147660 Expansion of 1/(1-x-x^2+x^9-x^11).

1, 1, 2, 3, 5, 8, 13, 21, 34, 54, 87, 140, 225, 362, 582, 936, 1505, 2420, 3892, 6259, 10065, 16186, 26029, 41858, 67313, 108248, 174077, 279938, 450176, 723941, 1164190, 1872167, 3010685, 4841568, 7785863, 12520667, 20134840, 32379408, 52070245, 83735639, 134657658, 216546802, 348235059

Offset

0,3

Links

Table of n, a(n) for n=0..42.

Index entries for linear recurrences with constant coefficients, signature (1, 1, 0, 0, 0, 0, 0, 0, -1, 0, 1).

Mathematica

f[x_] = -1 + x^2 - x^9 - x^10 + x^11;
g[x] = ExpandAll[x^11*f[1/x]];
a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]

Crossrefs

Sequence in context: A321021 A236768 A023439 * A013987 A261607 A261575

Adjacent sequences: A147657 A147658 A147659 * A147661 A147662 A147663

Keyword

nonn,easy

Author

Roger L. Bagula, Nov 09 2008

Status

approved