A160971 Numerators of constant terms of Fourier series of meromorphic modular forms E_k/Delta, where E_k is the normalized k th Eisenstein series [cf. Serre reference] and Delta is the normalized unique weight-twelve cusp form for the full modular group (the generating function of Ramanujan's tau function.)

264, -480, 504, -240, 82104, 0, 103128, 1024080, 4203864, 1863840, 5672869224, 15790320, 81426730488, 41356037952960, 185023705021848, 3639088741200, 631566517273421638632, 3701044943799840, 6265985243914780011624

Offset

2,1

References

J.-P. Serre, A Course in Arithmetic, Springer-Verlag, 1973, p. 93.

Links

Table of n, a(n) for n=2..20.

Formula

For 2 <= k <= 1000 and k != 7, the 2-order of the full constant term of E_k/Delta = 3 + ord_2(k - 7).

Mathematica

Table[SeriesCoefficient[(1 - (4 n/BernoulliB[2 n])*x/(1 - x)) / QPochhammer[x]^24, {x, 0, 1}], {n, 2, 20}] // Numerator (* Jean-François Alcover, Feb 28 2018 *)

Crossrefs

Cf. A000594.

Sequence in context: A351802 A050240 A105683 * A235012 A211713 A185764

Adjacent sequences: A160968 A160969 A160970 * A160972 A160973 A160974

Keyword

easy,frac,sign

Author

Barry Brent (barrybrent(AT)iphouse.com), Jun 01 2009

Status

approved