OFFSET
0,5
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..1000
MATHEMATICA
nmax = 60; CoefficientList[Series[Product[(1 - x^(5*k)) / ((1 - x^k)*(1 + x^(2*k) + x^(3*k))), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 23 2019 *)
PROG
(PARI) N=66; x='x+O('x^N); Vec(prod(k=1, N, 1+x^k/(1+x^(2*k)/(1+x^(3*k)))))
CROSSREFS
KEYWORD
sign,look
AUTHOR
Seiichi Manyama, Sep 23 2019
STATUS
approved