A029413 Expansion of 1/((1-x^6)*(1-x^7)*(1-x^8)*(1-x^9)).

1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 2, 2, 2, 1, 2, 1, 2, 3, 3, 3, 4, 3, 3, 4, 4, 4, 6, 5, 6, 6, 6, 6, 8, 7, 8, 9, 9, 9, 11, 10, 11, 12, 12, 12, 15, 14, 15, 16, 16, 16, 19, 18, 20, 21, 21, 21, 24, 23, 25, 27, 27, 27, 30, 29, 31, 33, 34, 34, 38, 36, 38, 40

Offset

0,15

Links

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

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

Mathematica

CoefficientList[Series[1/((1-x^6)(1-x^7)(1-x^8)(1-x^9)), {x, 0, 100}], x] (* or *) LinearRecurrence[{0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, -1, -1, -2, -1, -1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, -1}, {1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 2, 2, 2, 1, 2, 1, 2, 3, 3, 3, 4, 3, 3, 4, 4, 4}, 100] (* Harvey P. Dale, Jul 22 2018 *)

Prog

(PARI) Vec(1/((1-x^6)*(1-x^7)*(1-x^8)*(1-x^9)) + O(x^80)) \\ Jinyuan Wang, Feb 28 2020

Crossrefs

Sequence in context: A238529 A195150 A022307 * A237523 A339812 A238568

Adjacent sequences: A029410 A029411 A029412 * A029414 A029415 A029416

Keyword

nonn

Author

N. J. A. Sloane

Status

approved