A029938 a(n) = (p-5)(p-7)/24, where p=prime(n).

0, 0, 1, 2, 5, 7, 12, 22, 26, 40, 51, 57, 70, 92, 117, 126, 155, 176, 187, 222, 247, 287, 345, 376, 392, 425, 442, 477, 610, 651, 715, 737, 852, 876, 950, 1027, 1080, 1162, 1247, 1276, 1426, 1457, 1520, 1552, 1751

Offset: 3

Author

N. J. A. Sloane

Keywords

• nonn
• nice

Comments

Also the dimension of the space of cusp forms of weight two on Gamma1(p), where p=5, 7, 11, 13, ... ranges over all primes exceeding 3. - Steven Finch, Apr 03 2009

References

• F. Hirzebruch et al., Manifolds and Modular Forms, Vieweg, 2nd ed. 1994, p. 161.

Links

• T. D. Noe, Table of n, a(n) for n = 3..1000

Crossrefs

Cf. A029937. - Steven Finch, Apr 03 2009

Cf. A000040.

Programs

Magma

[(p-5)*(p-7)/24: p in PrimesInInterval(4, 300)]; // Vincenzo Librandi, Feb 28 2014

Maple

A029938:=n->(ithprime(n)-5)*(ithprime(n)-7)/24; seq(A029938(n), n=3..60); # Wesley Ivan Hurt, Feb 25 2014

Mathematica

((#-5)(#-7))/24&/@Prime[Range[3,60]] (* Harvey P. Dale, Feb 01 2012 *)
Table[(Prime[n] - 5) (Prime[n] - 7)/24, {n, 3, 30}] (* Wesley Ivan Hurt, Feb 25 2014 *)

Formula

a(n) = (A000040(n) - 5)*(A000040(n) - 7)/24. - Wesley Ivan Hurt, Feb 25 2014