A219030 Powers of odd primes (exponent > 1) for which 2 is not a primitive root.

49, 289, 343, 529, 961, 1681, 1849, 2209, 2401, 4913, 5041, 5329, 6241, 7921, 9409, 10609, 11881, 12167, 12769, 16129, 16807, 18769, 22801, 24649, 27889, 29791, 36481, 37249, 39601, 49729, 52441, 54289, 57121, 58081, 63001, 66049, 68921, 69169, 73441

Offset: 1

Author

V. Raman, Nov 10 2012

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A167791, A216848, A108989.

Programs

PARI

for(n=3,100000,if(n%2==1&&isprime(n)==0&&znorder(Mod(2,n))!=eulerphi(n)&&matsize(factor(n))[1]==1,print1(n",")))

PARI

list(lim)=my(v=List(),L=log(lim+.5));forprime(p=3,sqrtint(lim\1), for(e=2,L\log(p), if(znorder(Mod(2,p^e))Charles R Greathouse IV, Nov 12 2012