%I #6 Oct 04 2017 11:48:29
%S 1,0,1,1,0,2,2,2,2,3,4,4,6,7,8,9,9,14,15,17,22,23,27,33,36,43,48,56,
%T 64,72,84,94,109,124,136,157,178,197,225,253,286,319,358,401,451,500,
%U 559,628,694,774,863,958,1066,1181,1310,1449,1605,1778,1957,2170
%N Expansion of Product_{k>=1} (1 + x^k - x^(k^2)).
%H Vaclav Kotesovec, <a href="/A293254/b293254.txt">Table of n, a(n) for n = 0..10000</a>
%t nmax = 100; CoefficientList[Series[Product[(1+x^k-x^(k^2)), {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A033461, A263401, A276516, A293253.
%K nonn
%O 0,6
%A _Vaclav Kotesovec_, Oct 04 2017