A170970 Expansion of Product_{i=0..m-1} (1 + x^(4*i+1)) for m = 7.

1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 3, 2, 0, 1, 3, 3, 1, 0, 3, 4, 1, 0, 2, 4, 2, 0, 2, 5, 3, 0, 1, 4, 4, 1, 1, 4, 4, 1, 0, 3, 5, 2, 0, 2, 4, 2, 0, 1, 4, 3, 0, 1, 3, 3, 1, 0, 2, 3, 1, 0, 1, 2, 1, 0, 1, 2, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 1

Offset: 0

Author

N. J. A. Sloane, Aug 29 2010

Keywords

• nonn
• fini
• full

Crossrefs

Cf. A169975, A170966-A170984.

Programs

Mathematica

CoefficientList[Series[Product[1+x^(4i+1),{i,0,6}],{x,0,100}],x] (* Harvey P. Dale, Jun 20 2015 *)