A025910 Expansion of 1/((1-x^7)(1-x^8)(1-x^11)).

1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1, 1, 1, 1, 2, 2, 1, 2, 2, 1, 2, 2, 2, 2, 2, 3, 2, 2, 3, 3, 2, 3, 3, 3, 3, 3, 4, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7

Offset

0,23

Links

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

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

Formula

a(0)=1, a(1)=0, a(2)=0, a(3)=0, a(4)=0, a(5)=0, a(6)=0, a(7)=1, a(8)=1, a(9)=0, a(10)=0, a(11)=1, a(12)=0, a(13)=0, a(14)=1, a(15)=1, a(16)=1, a(17)=0, a(18)=1, a(19)=1, a(20)=0, a(21)=1, a(22)=2, a(23)=1, a(24)=1, a(25)=1, a(n)=a(n-7)+a(n-8)+a(n-11)-a(n-15)-a(n-18)-a(n-19)+a(n-26). - Harvey P. Dale, Apr 18 2015

Mathematica

CoefficientList[Series[1/((1-x^7)(1-x^8)(1-x^11)), {x, 0, 100}], x] (* or *) LinearRecurrence[{0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, -1, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 0, 1, 2, 1, 1, 1}, 100] (* Harvey P. Dale, Apr 18 2015 *)

Crossrefs

Sequence in context: A359997 A122172 A030613 * A002637 A166279 A077478

Adjacent sequences: A025907 A025908 A025909 * A025911 A025912 A025913

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved