|
|
A061732
|
|
Primes with 28 as smallest positive primitive root.
|
|
1
|
|
|
133321, 140351, 151009, 160081, 191161, 224041, 277747, 282481, 298681, 344161, 485161, 509521, 570001, 669241, 675601, 700129, 784351, 859751, 874681, 1014121, 1068721, 1222831, 1613041, 1618387, 1794841, 1795561, 1868231
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Prime[ Select[ Range[150000], PrimitiveRoot[ Prime[ # ] ] == 28 & ] ]
(* or *)
Select[ Prime@Range@150000, PrimitiveRoot@# == 28 &] (* Robert G. Wilson v, May 11 2001 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|