A259502 Primes p such that nextprime(p + 1)^(p - 1) == 1 (mod p^2).

5, 47, 151051, 240727, 911135839

Offset: 1

Author

Felix Fröhlich, Nov 08 2015

Keywords

• nonn
• hard
• more

Comments

Nextprime as defined in A007918.

These are Wieferich primes p to a prime base q where the difference between p and q has minimal or almost minimal (if the difference between p and the previous prime is smaller) value.

No further terms up to 10^9.

Crossrefs

Cf. A001220, A007918, A244546, A260377, A260507.

Programs

PARI

forprime(p=1, , if(Mod(nextprime(p+1), p^2)^(p-1)==1, print1(p, ", ")))