A029390 Expansion of 1/((1-x^5)(1-x^6)(1-x^10)(1-x^11)).

1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 2, 2, 1, 0, 0, 2, 3, 2, 1, 0, 3, 4, 4, 2, 1, 3, 5, 5, 4, 2, 5, 6, 7, 6, 4, 6, 8, 8, 8, 6, 9, 10, 11, 10, 9, 11, 13, 13, 13, 11, 15, 16, 17, 16, 15, 18, 20, 20, 20, 18, 23, 24, 25, 24, 23, 27, 30, 29

Offset

0,11

Links

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

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

Formula

a(0)=1, a(1)=0, a(2)=0, a(3)=0, a(4)=0, a(5)=1, a(6)=1, a(7)=0, a(8)=0, a(9)=0, a(10)=2, a(11)=2, a(12)=1, a(13)=0, a(14)=0, a(15)=2, a(16)=3, a(17)=2, a(18)=1, a(19)=0, a(20)=3, a(21)=4, a(22)=4, a(23)=2, a(24)=1, a(25)=3, a(26)=5, a(27)=5, a(28)=4, a(29)=2, a(30)=5, a(31)=6, a(n)=a(n-5)+a(n-6)+a(n-10)-a(n-15)-2*a(n-16)- a(n-17)+ a(n-22)+ a(n-26)+a(n-27)-a (n-32). - Harvey P. Dale, May 01 2013

Mathematica

CoefficientList[Series[1/((1-x^5)(1-x^6)(1-x^10)(1-x^11)), {x, 0, 80}], x] (* or *) LinearRecurrence[{0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, -1, -2, -1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, -1}, {1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 2, 2, 1, 0, 0, 2, 3, 2, 1, 0, 3, 4, 4, 2, 1, 3, 5, 5, 4, 2, 5, 6}, 80] (* Harvey P. Dale, May 01 2013 *)

Crossrefs

Sequence in context: A191411 A133418 A181169 * A108040 A137566 A258277

Adjacent sequences: A029387 A029388 A029389 * A029391 A029392 A029393

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved