A114667 Primes with 51 as smallest positive primitive root.
322999, 1302841, 3138071, 3795289, 5062711, 5334911, 5352649, 5579641, 5780329, 6202681, 6329231, 6357121, 7014121, 7156231, 7179481, 7184857, 8334481, 8340721, 8798431, 9355921, 9895201, 10136449, 10750489, 11660791, 11729041, 11924929, 12444721, 12787321
Offset: 1
Links
- Robert Price, Table of n, a(n) for n = 1..4244
Programs
-
Mathematica
(* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@790000, PrimitiveRoot@# == 51 &]
Extensions
a(26)-a(28) from Robert Price, Nov 20 2023