A208150 - OEIS

%I #19 Dec 18 2022 07:05:20

%S -2,3,0,0,0,0,0,0,-3,0,0,0,0,0,0,-4,3,0,0,0,0,0,0,-3,-3,0,0,0,0,0,-4,

%T 2,3,0,0,0,0,0,-3,-9,-3,0,0,0,0,-4,1,5,3,0,0,0,0,1,-15,-9,-3,0,0,0,-4,

%U 0,6,5,3,0,0,0,5,-20,-21,-12,-3,0,0,-4,-1,16

%N Expansion of (1 + 2*Product_{i>=1} (1 + x^(8*i - 1)))/(-1 + Product_{i>=1} (1 - x^(8*i - 1))).

%e -3/x^7 - 2 + 3*x -3*x^8 - 4*x^15 + 3*x^16 - 3*x^23 - 3*x^24 - 4*x^30 + ...

%t Table[SeriesCoefficient[

%t   Series[(1 + 2*Product[1 + x^(8*i - 1), {i, 1, Infinity}])/(-1 +

%t       Product[(1 - x^(8*i - 1)), {i, 1, Infinity}]), {x, 0, 100}],

%t   n], {n, 0, 100}]

%Y Cf. A207944, A080054, A142724.

%K sign,less

%O 0,1

%A _Roger L. Bagula_, Feb 23 2012