OFFSET
0,5
EXAMPLE
1 + x + x^2/((1 + x)*(1 - x)) + x^4/((1 + x^2)*(1 - x)*(1 - x^2)) + x^8/((1 + x^4)*(1 - x)*(1 - x^2)*(1 - x^4)) + ...
MATHEMATICA
max = 65; 1+x+Sum[x^(2^n)/((1+x^(2^(n-1))) Product[1-x^(2^j), {j, 0, n-1}] ), {n, 1, Log[2, max] // Ceiling}] + O[x]^max // CoefficientList[#, x]& (* Jean-François Alcover, Oct 05 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Dec 02 2003
STATUS
approved