|
%I #26 Jun 18 2022 13:41:06
%S 0,0,1,2,5,7,12,22,26,40,51,57,70,92,117,126,155,176,187,222,247,287,
%T 345,376,392,425,442,477,610,651,715,737,852,876,950,1027,1080,1162,
%U 1247,1276,1426,1457,1520,1552,1751
%N a(n) = (p-5)(p-7)/24, where p=prime(n).
%C 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
%D F. Hirzebruch et al., Manifolds and Modular Forms, Vieweg, 2nd ed. 1994, p. 161.
%H T. D. Noe, <a href="/A029938/b029938.txt">Table of n, a(n) for n = 3..1000</a>
%F a(n) = (A000040(n) - 5)*(A000040(n) - 7)/24. - _Wesley Ivan Hurt_, Feb 25 2014
%p A029938:=n->(ithprime(n)-5)*(ithprime(n)-7)/24; seq(A029938(n), n=3..60); # _Wesley Ivan Hurt_, Feb 25 2014
%t ((#-5)(#-7))/24&/@Prime[Range[3,60]] (* _Harvey P. Dale_, Feb 01 2012 *)
%t Table[(Prime[n] - 5) (Prime[n] - 7)/24, {n, 3, 30}] (* _Wesley Ivan Hurt_, Feb 25 2014 *)
%o (Magma) [(p-5)*(p-7)/24: p in PrimesInInterval(4, 300)]; // _Vincenzo Librandi_, Feb 28 2014
%Y Cf. A029937. - _Steven Finch_, Apr 03 2009
%Y Cf. A000040.
%K nonn,nice
%O 3,4
%A _N. J. A. Sloane_
|
