login
A061741
Primes with 39 as smallest positive primitive root.
32
166031, 264961, 325249, 388081, 450071, 462841, 543601, 735271, 816649, 823201, 915049, 1063561, 1155151, 1414081, 1415929, 1554169, 1704271, 1884121, 1952449, 2181271, 2215921, 2290831, 2477521, 2499421, 2514961, 2585647, 2633689
OFFSET
1,1
LINKS
MATHEMATICA
Select[ Prime@Range@221000, PrimitiveRoot@# == 39 &] (* Robert G. Wilson v, May 11 2001 *)
PROG
(PARI) is(n)=if(n<9||!isprime(n), return(0)); for(k=2, 38, if(znorder(Mod(k, n))==n-1, return(0))); znorder(Mod(39, n))==n-1 \\ Charles R Greathouse IV, Apr 28 2015
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, May 06 2001
EXTENSIONS
More terms from Robert G. Wilson v, May 11 2001 and Dec 21 2005
STATUS
approved