A103203 Primes which have more primitive roots than any smaller prime.

2, 5, 11, 17, 23, 29, 41, 47, 53, 59, 83, 107, 137, 149, 167, 173, 179, 227, 257, 263, 269, 293, 317, 347, 359, 383, 389, 467, 479, 503, 509, 557, 563, 587, 653, 719, 773, 797, 809, 839, 857, 863, 887, 929, 977, 983, 1019, 1049, 1097, 1109, 1187, 1229

Offset: 1

Author

Don Reble, Mar 19 2005

Keywords

• nonn

Links

• Jeppe Stig Nielsen, Table of n, a(n) for n = 1..100000

Crossrefs

Cf. A103521, A121519, A008330.

Programs

PARI

my(record=0, r); forprime(p=2, 1500, r=eulerphi(p-1); if(r>record, record=r; print1(p,", "))) \\ Jeppe Stig Nielsen, Oct 18 2019