(Translated by https://www.hiragana.jp/)
A255209 - OEIS
login
A255209
Primes p for which exactly six bases b with 1 < b < p exist such that p is a base b Wieferich prime.
8
5107, 20771, 51427, 52517, 61417, 66161, 116731, 119359, 128657, 140741, 147647, 150559, 199783, 203773, 213949, 229939, 237283, 261761, 286751, 288929, 303089, 339139, 342373, 381853, 384611, 385657, 475897
OFFSET
1,1
COMMENTS
p = prime(n) such that A242830(n) = 6.
PROG
(PARI) forprime(p=1, , b=2; i=0; while(b < p, if(Mod(b, p^2)^(p-1)==1, i++); b++); if(i==6, print1(p, ", ")))
KEYWORD
nonn,more
AUTHOR
Felix Fröhlich, Feb 17 2015
STATUS
approved