|
|
A058609
|
|
McKay-Thompson series of class 28D for Monster.
|
|
1
|
|
|
1, 2, 3, 6, 9, 14, 22, 30, 42, 60, 81, 110, 148, 194, 256, 336, 433, 556, 713, 904, 1144, 1440, 1798, 2242, 2784, 3438, 4234, 5196, 6353, 7748, 9419, 11414, 13796, 16636, 20004, 23996, 28722, 34296, 40869, 48604, 57678, 68318, 80779, 95332, 112313, 132104, 155117, 181856, 212890
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,2
|
|
LINKS
|
|
|
FORMULA
|
Expansion of q^(1/2)*((eta(q^2)*eta(q^7))/(eta(q)*eta(q^14)))^2 in powers of q. - G. C. Greubel, Jun 18 2018
a(n) ~ exp(2*Pi*sqrt(n/7)) / (2 * 7^(1/4) * n^(3/4)). - Vaclav Kotesovec, Jun 28 2018
|
|
EXAMPLE
|
T28D = 1/q + 2*q + 3*q^3 + 6*q^5 + 9*q^7 + 14*q^9 + 22*q^11 + 30*q^13 + ...
|
|
MATHEMATICA
|
eta[q_]:= q^(1/24)*QPochhammer[q]; e28D:= q^(1/2)*((eta[q^2]*eta[q^7])/(eta[q]*eta[q^14]))^2; a[n_] := SeriesCoefficient[e28D , {q, 0, n}]; Table[a[n], {n, 0, 50}] (* G. C. Greubel, Feb 18 2018 *)
|
|
PROG
|
(PARI) q='q+O('q^50); A = ((eta(q^2)*eta(q^7))/(eta(q)*eta(q^14)))^2; Vec(A) \\ G. C. Greubel, Jun 18 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|