A256052 Coefficients of mock modular form H_2^(4) (divided by 2).
8, 24, 56, 112, 216, 392, 672, 1128, 1840, 2912, 4536, 6936, 10416, 15456, 22632, 32728, 46872, 66472, 93400, 130200, 180104, 247312, 337392, 457408, 616392, 826104, 1101352, 1460928, 1928880, 2535280, 3318000, 4324824, 5615224, 7263424, 9362088, 12025904, 15396856, 19650792
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..2500
- Miranda C. N. Cheng, John F. R. Duncan, Jeffrey A. Harvey, Umbral Moonshine, arXiv:1204.2779 [math.RT], 2012-2013.
Crossrefs
Equals 8 times A256209.
Programs
-
Mathematica
nmax = 50; a:= 8*CoefficientList[Series[q*Sum[q^(k - 1)*(Product[1 + q^j, {j, 1, 2 k - 2}])/(Product[1 - q^(2 j - 1), {j, 1, k}])^2, {k, 0, nmax}], {q, 0, 150}], q]; Table[a[[n]], {n, 1, 100}] (* G. C. Greubel, Jul 27 2018 *)