|
|
A278399
|
|
G.f.: Re((i; x)_inf), where (a; q)_inf is the q-Pochhammer symbol, i = sqrt(-1).
|
|
12
|
|
|
1, -1, -1, -2, -2, -3, -2, -3, -2, -2, 0, 0, 3, 4, 8, 9, 14, 16, 22, 24, 30, 32, 39, 40, 46, 46, 51, 48, 52, 46, 46, 36, 32, 16, 8, -15, -30, -60, -82, -122, -151, -200, -238, -296, -342, -412, -464, -542, -602, -686, -750, -841, -904, -996, -1058, -1146, -1198
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
The q-Pochhammer symbol (a; q)_inf = Product_{k>=0} (1 - a*q^k).
|
|
LINKS
|
|
|
FORMULA
|
(i; x)_inf is the g.f. for a(n) + i*A278400(n).
G.f.: Sum_{n >= 0} (-1)^n^x^(n*(2*n-1))/Product_{k = 1..2*n} 1 - x^k. - Peter Bala, Feb 04 2021
|
|
MAPLE
|
G := add((-1)^n*x^(n*(2*n-1))/mul(1 - x^k, k = 1..2*n), n = 0..7):
S := series(G, x, 101):
seq(coeff(S, x, j), j = 0..100); # Peter Bala, Feb 04 2021
|
|
MATHEMATICA
|
Re[(QPochhammer[I, x] + O[x]^60)[[3]]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|