|
|
A058101
|
|
McKay-Thompson series of class 10E for Monster.
|
|
5
|
|
|
1, 0, 1, 2, 2, -2, -1, 0, -4, -2, 5, 2, 0, 8, 2, -8, -3, -2, -14, -6, 14, 6, 4, 24, 12, -24, -11, -4, -40, -16, 38, 16, 5, 62, 24, -60, -24, -10, -94, -40, 91, 38, 18, 144, 62, -136, -57, -24, -214, -88, 201, 82, 30, 308, 122, -288, -117, -48, -440, -180, 410, 168, 74, 624, 262, -578, -238, -96, -874, -356, 804
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,4
|
|
LINKS
|
|
|
EXAMPLE
|
T10E = 1/q + q + 2*q^2 + 2*q^3 - 2*q^4 - q^5 - 4*q^7 - 2*q^8 + 5*q^9 + 2*q^10 + ...
|
|
MATHEMATICA
|
eta[q_]:= q^(1/24)*QPochhammer[q]; A058101:= CoefficientList[Series[ q*(3 + (eta[q]^3*eta[q^5])/(eta[q^2]*eta[q^10]^3)), {q, 0, 60}], q]; Table[A058101[[n]], {n, 1, 50}] (* G. C. Greubel, May 28 2018 *)
|
|
PROG
|
(PARI) q='q+O('q^60); {h =(eta(q)^3*eta(q^5)/(eta(q^2)*eta(q^10)^3))/q}; Vec(3 + h) \\ G. C. Greubel, May 28 2018
|
|
CROSSREFS
|
Cf. A138516 (same sequence except for n=0).
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|