OFFSET
0,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..80
MATHEMATICA
Table[SeriesCoefficient[Product[((1 + x^k)/(1 - x^k))^DivisorSigma[n, k], {k, 1, n}], {x, 0, n}], {n, 0, 15}] (* Vaclav Kotesovec, Oct 27 2018 *)
PROG
(PARI) {a(n) = polcoeff(prod(k=1, n, ((1+x^k+x*O(x^n))/(1-x^k+x*O(x^n)))^sigma(k, n)), n)}
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Oct 26 2018
STATUS
approved