OFFSET
0,3
FORMULA
G.f.: Product_{i>=1} (1/(1-x^i) - x^i + y^i*x^i)^A001037(i).
EXAMPLE
1;
0, 2;
2, 0, 2;
2, 2, 0, 4;
4, 2, 2, 0, 8;
4, 4, 2, 6, 0, 16;
10, 2, 4, 6, 10, 0, 32;
8, 10, 4, 10, 10, 22, 0, 64;
MATHEMATICA
nn = 12; q = 2; a = Table[1/n Sum[MoebiusMu[n/d] q^d, {d, Divisors[n]}], {n, 1, nn}]; Table[Take[CoefficientList[ Series[Product[(1/(1 - z^i) - z^i + u^i z^i)^a[[i]], {i, 1, nn}], {z, 0, nn}], {z, u}][[j]], j], {j, 1, nn}] // Grid
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Geoffrey Critzer, Aug 13 2022
STATUS
approved