|
|
A319553
|
|
Expansion of 1/theta_4(q)^8 in powers of q = exp(Pi i t).
|
|
4
|
|
|
1, 16, 144, 960, 5264, 25056, 106944, 418176, 1520784, 5201232, 16871648, 52252992, 155341248, 445226848, 1234726272, 3323392128, 8704504976, 22234655520, 55498917840, 135595345600, 324759439584, 763505859072, 1764050361152, 4009763323008, 8975341703616, 19800832628336
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
a(0) = 1, a(n) = (16/n)*Sum_{k=1..n} A002131(k)*a(n-k) for n > 0.
G.f.: Product_{k>=1} ((1 - x^(2k))/(1 - x^k)^2)^8.
|
|
PROG
|
(PARI) N=99; x='x+O('x^N); Vec(prod(k=1, N, ((1-x^(2*k))/(1-x^k)^2)^8))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|