A255204 Primes p for which exactly one base b with 1 < b < p exists such that p is a base b Wieferich prime.

29, 37, 43, 59, 79, 97, 103, 109, 113, 137, 151, 181, 191, 197, 199, 223, 233, 241, 257, 263, 281, 283, 293, 307, 373, 379, 397, 401, 419, 421, 433, 439, 449, 461, 499, 521, 523, 547, 557, 563, 577, 601, 617, 619, 641, 659, 661, 701, 727, 739, 743, 761, 769

Offset

1,1

Comments

p = prime(n) such that A242830(n) = 1.

Links

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

Prog

(PARI) forprime(p=1, , b=2; i=0; while(b < p, if(Mod(b, p^2)^(p-1)==1, i++); b++); if(i==1, print1(p, ", ")))

Crossrefs

Cf. A255203, A255205, A255206, A255207, A255208, A255209, A255210.

Sequence in context: A172195 A161724 A046502 * A049746 A097997 A177873

Adjacent sequences: A255201 A255202 A255203 * A255205 A255206 A255207

Keyword

nonn

Author

Felix Fröhlich, Feb 17 2015

Status

approved