|
%I #5 Jan 08 2016 12:51:49
%S 1,0,-1,-2,-4,-2,-5,6,7,18,31,50,17,34,39,-122,-134,-296,-298,-556,
%T -670,-692,64,26,1119,1054,3953,6804,6645,9250,8644,9702,2817,11386,
%U -12415,-36382,-47757,-71782,-122506,-99540,-191083,-176382,-253722,-166706,-21024
%N Expansion of Product_{k>=1} ((1 - k*x^k) / (1 - x^k)).
%C Convolution of A022661 and A000041.
%H Vaclav Kotesovec, <a href="/A267005/b267005.txt">Table of n, a(n) for n = 0..10000</a>
%t nmax = 50; CoefficientList[Series[Product[(1-k*x^k)/(1-x^k), {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A000041, A022661, A267004.
%K sign
%O 0,4
%A _Vaclav Kotesovec_, Jan 08 2016
|
