A145284 a(n) = number of monomials in n-th power of polynomial x^3-x^2-x-1

4, 6, 8, 13, 16, 17, 21, 25, 28, 30, 33, 36, 40, 42, 46, 49, 52, 55, 58, 61, 64, 67, 70, 73, 76, 79, 82, 85, 88, 91, 94, 97, 100, 103, 106, 109, 112, 115, 118, 121, 124, 127, 130, 133, 136, 139, 142, 145, 148, 151, 154, 157, 160, 163, 166, 169, 172, 175, 178, 181

Offset

1,1

Comments

a(n)=Length[(x^3-x^2-x-1)^n]

Links

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

Mathematica

a = {}; k = x^3 - x^2- x - 1; m = k; Do[AppendTo[a, Length[m]]; m = Expand[m*k], {n, 1, 100}]; a (*Artur Jasinski*)

Crossrefs

Sequence in context: A121613 A008438 A141641 * A023560 A340960 A261680

Adjacent sequences: A145281 A145282 A145283 * A145285 A145286 A145287

Keyword

nonn

Author

Artur Jasinski, Oct 06 2008

Status

approved