OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..1000
MATHEMATICA
Abs[CoefficientList[Series[1/QPochhammer[I*x, x], {x, 0, 100}], x]]^2 (* Vaclav Kotesovec, Sep 17 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Sep 17 2017
STATUS
approved