A028542 Character of extremal vertex operator algebra of rank 37/2.

1, 0, 0, 6956, 44141, 482813, 2321121, 13270161, 52888984, 222985939, 773076890, 2713247555, 8451095075, 26173402583, 74876493333, 211438116567, 564402008802, 1483207883942, 3737481285011, 9267079836807, 22239355857266, 52539499752378, 120903852703049

Offset

0,4

References

G. Höhn, Selbstduale Vertexoperatorsuperalgebren und das Babymonster, Bonner Mathematische Schriften, Vol. 286 (1996), 1-85.

Links

Table of n, a(n) for n=0..22.

G. Höhn (gerald(AT)math.ksu.edu), Selbstduale Vertexoperatorsuperalgebren und das Babymonster, Doctoral Dissertation, Univ. Bonn, Jul 15 1995 (pdf, ps).

Formula

G.f.: x^(2*r/24) * (B(x)^(2*r) - 2*r*B(x)^(2*r-24) - r*(47-2*r)*B(x)^(2*r-48)) where B(x) = x^(-1/24) * Product_{k>=0} (1+x^(2*k+1)) = x^(-1/24) * A000700 and r = 37/2. - Sean A. Irvine, Feb 29 2020

a(n) ~ r^(1/4)*exp(Pi*sqrt(r*n/3)) / (2^(3/2) * 3^(1/4) * n^(3/4)) * (1 - (3^(3/2)/(8*Pi*sqrt(r)) + Pi*r^(3/2)/(8*3^(3/2)))/sqrt(n)), where r = 37/2. - Vaclav Kotesovec, May 16 2025

Mathematica

nmax = 30; With[{r=37/2}, CoefficientList[Series[Product[(1 + x^(2*k + 1))^(2*r), {k, 0, nmax}] - 2*r*x*Product[(1 + x^(2*k + 1))^(2*r - 24), {k, 0, nmax}] + (2*r-47)*r*x^2*Product[(1 + x^(2*k + 1))^(2*r - 48), {k, 0, nmax}], {x, 0, nmax}], x]] (* Vaclav Kotesovec, May 16 2025 *)

Crossrefs

Cf. A000700.

Sequence in context: A183666 A252368 A237468 * A263287 A234111 A184228

Adjacent sequences: A028539 A028540 A028541 * A028543 A028544 A028545

Keyword

nonn,easy

Author

N. J. A. Sloane

Extensions

More terms from Sean A. Irvine, Feb 29 2020

Status

approved