A289833 Fourier coefficients of -q*(Delta/q)' where Delta is the normalized unique weight-twelve cusp form for the full modular group (the generating function of Ramanujan's tau function).

24, -504, 4416, -19320, 30240, 100464, -591360, 909144, 1043280, -5346120, 4080384, 6932856, -5224128, -17040240, -14807040, 110494944, -46366344, -191905560, 135085440, 84389760, 269444448, -410151984, -489646080, 611981400, -346642800, 1905256080

Offset: 1

Author

Seiichi Manyama, Jul 13 2017

Keywords

• sign

Examples

			G.f.: 24*q - 504*q^2 + 4416*q^3 - 19320*q^4 + 30240*q^5 + 100464*q^6 - 591360*q^7 + ...
		

Links

• Seiichi Manyama, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000594, A006352 (E_2), A147843.

Programs

Mathematica

a[n_] := -n * RamanujanTau[n+1]; Array[a, 26] (* Amiram Eldar, Jan 11 2025 *)

PARI

a(n) = -n * ramanujantau(n+1); \\ Amiram Eldar, Jan 11 2025

Formula

a(n) = -n*A000594(n+1).