login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

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
OFFSET
0,4
COMMENTS
The q-Pochhammer symbol (a; q)_inf = Product_{k>=0} (1 - a*q^k).
LINKS
Eric Weisstein's World of Mathematics, q-Pochhammer Symbol.
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