OFFSET
0,5
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..10000
MATHEMATICA
nmax = 100; CoefficientList[Series[Product[(1-x^(5*k+4))^(5*k+4), {k, 0, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Apr 15 2017 *)
PROG
(PARI) x='x+O('x^100); Vec(prod(k=0, 100, (1 - x^(5*k + 4))^(5*k + 4))) \\ Indranil Ghosh, Apr 15 2017
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Apr 15 2017
STATUS
approved