login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes p for which no bases b with 1 < b < p exist such that p is a base b Wieferich prime.
8

%I #9 Mar 07 2015 15:32:39

%S 2,3,5,7,13,17,19,23,31,41,47,53,61,67,73,83,89,101,107,139,149,157,

%T 167,173,179,193,227,239,251,271,277,311,317,337,383,389,409,431,443,

%U 457,467,479,491,503,541,569,587,593,613,643,677,683,691,709,719,733

%N Primes p for which no bases b with 1 < b < p exist such that p is a base b Wieferich prime.

%C p = prime(n) such that A242830(n) = 0.

%o (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, ", ")))

%Y Cf. A255204, A255205, A255206, A255207, A255208, A255209, A255210.

%K nonn

%O 1,1

%A _Felix Fröhlich_, Feb 17 2015