OFFSET
0,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..10000
FORMULA
MATHEMATICA
eta = QPochhammer;
CoefficientList[eta[q^2]^4/eta[q]^8 + O[q]^30, q] (* Jean-François Alcover, Feb 21 2021 *)
PROG
(Julia) # JacobiTheta4 is defined in A002448.
A284286List(len) = JacobiTheta4(len, -4)
A284286List(29) |> println # Peter Luschny, Mar 12 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, May 02 2017
STATUS
approved