A246515 a(n) such that the series 1/((1-x^a(1))(1-x^a(2))...)=1+x+x^8+x^27+...+x^(j^3)+... when read mod 2.

1, 2, 4, 9, 10, 11, 12, 13, 14, 15, 18, 19, 22, 23, 25, 26, 27, 30, 37, 38, 40, 41, 42, 44, 45, 48, 51, 52, 53, 54, 55, 56, 58, 59, 64, 67, 68, 70, 71, 72, 73, 74, 79, 82, 83, 84, 86, 88, 89, 93

Offset: 1

Author

David S. Newman, Aug 28 2014

Keywords

• nonn

Programs

Mathematica

iend=150;
aim=CoefficientList[Sum[x^(i^3),{i,0,iend^(1/3)+1}],x];
c[1]=1;
index=1;
For[i=1,i