A124787 Primes p such that p divides the Wolstenholme number A007408((p+1)/2).
3, 11, 17, 89, 2305777
Offset: 1
Crossrefs
Cf. A007408 (Wolstenholme numbers).
Programs
-
PARI
{s=0;h=1;forprime(p=3,2400000,q=(p+1)/2;s=s+sum(k=h,q,1/k^3);if(numerator(s)%p==0,print1(p,","));h=q+1)} \\ Klaus Brockhaus, Nov 10 2006
Extensions
a(5) from Klaus Brockhaus, Nov 10 2006