A143611 Expansion of x/((1-x)^2(1+x-x^3-x^4-x^5-x^6-x^7+x^9+x^10)).

1, 1, 2, 3, 4, 6, 8, 11, 14, 18, 23, 29, 36, 45, 55, 67, 82, 99, 120, 144, 173, 207, 247, 295, 351, 417, 495, 587, 695, 823, 973, 1150, 1358, 1603, 1892, 2231, 2631, 3101, 3654, 4305, 5071, 5972, 7032, 8279, 9746, 11472, 13502, 15891, 18700, 22005, 25893

Offset

1,3

Links

Table of n, a(n) for n=1..51.

Formula

G.f.: x/((1-x)^2(1+x-x^3-x^4-x^5-x^6-x^7+x^9+x^10)). [R. J. Mathar, Nov 01 2008]

Mathematica

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

Crossrefs

Sequence in context: A175869 A007279 A034891 * A279075 A062464 A053270

Adjacent sequences: A143608 A143609 A143610 * A143612 A143613 A143614

Keyword

nonn,easy,less

Author

Roger L. Bagula and Gary W. Adamson, Oct 26 2008

Extensions

Better name (using g.f.) from Joerg Arndt, Apr 06 2018

Status

approved