A061734 Primes with 30 as smallest positive primitive root.

124153, 133261, 140071, 209353, 343381, 384913, 948391, 984817, 1151473, 1189471, 1282909, 1516759, 1517101, 1629031, 1666711, 1736617, 1819273, 1918879, 1998793, 2142271, 2176831, 2201671, 2306221, 2314231, 2526781, 2534101, 2557501, 2566261, 3131353, 3150391

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..530

Mathematica

Prime[ Select[ Range[100000], PrimitiveRoot[ Prime[ # ] ] == 30 & ] ]
(* or *)
Select[ Prime@Range@100000, PrimitiveRoot@# == 30 &] (* Robert G. Wilson v, May 11 2001 *)

Crossrefs

Cf. A001918, A001126, A019356.

Sequence in context: A206184 A205366 A185992 * A263081 A030639 A261439

Adjacent sequences: A061731 A061732 A061733 * A061735 A061736 A061737

Keyword

nonn

Author

Klaus Brockhaus, May 06 2001

Extensions

More terms from Robert G. Wilson v, May 11 2001

a(12)-a(30) from Vincenzo Librandi, Sep 22 2013

Status

approved