A124787 Primes p such that p divides the Wolstenholme number A007408((p+1)/2).

3, 11, 17, 89, 2305777

Offset

1,1

Links

Table of n, a(n) for n=1..5.

Prog

(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

Crossrefs

Cf. A007408 = Wolstenholme numbers.

Sequence in context: A061368 A145701 A072982 * A080306 A128346 A128031

Adjacent sequences: A124784 A124785 A124786 * A124788 A124789 A124790

Keyword

more,nonn

Author

Alexander Adamchuk, Nov 07 2006

Extensions

a(5) from Klaus Brockhaus, Nov 10 2006

Status

approved