login
A255203
Primes p for which no bases b with 1 < b < p exist such that p is a base b Wieferich prime.
8
2, 3, 5, 7, 13, 17, 19, 23, 31, 41, 47, 53, 61, 67, 73, 83, 89, 101, 107, 139, 149, 157, 167, 173, 179, 193, 227, 239, 251, 271, 277, 311, 317, 337, 383, 389, 409, 431, 443, 457, 467, 479, 491, 503, 541, 569, 587, 593, 613, 643, 677, 683, 691, 709, 719, 733
OFFSET
1,1
COMMENTS
p = prime(n) such that A242830(n) = 0.
PROG
(PARI) forprime(p=1, , b=2; i=0; while(b < p, if(Mod(b, p^2)^(p-1)==1, i++); b++); if(i==0, print1(p, ", ")))
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Feb 17 2015
STATUS
approved