The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A114682 Primes with 67 as smallest positive primitive root. 0

%I

%S 3384481,4280329,4555151,5334313,6915191,7265281,7586401,7761121,

%T 9240001,10483201,10859689,11081641,11314801,11682889,12002761,

%U 12426481,12493321,14000281,15210001,18410831,19587481,21475609,21573191

%N Primes with 67 as smallest positive primitive root.

%F Equals { p in A000040 | A001918(p) = 67 }. - _M. F. Hasler_, Feb 22 2012

%t (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ Prime@Range@1450000, PrimitiveRoot@# == 67 &]

%t Select[Prime[Range[1450000]],PrimitiveRoot[#]==67&] (* _Harvey P. Dale_, Feb 22 2012 *)

%o (PARI) /* The following assumes that znprimroot() returns the smallest primitive root */ is_A114682(n)={ znprimroot(n)==67 } \\ _M. F. Hasler_, Feb 22 2012

%Y Cf. A001122-A001126, A061323-A061335, A061730-A061741, A114657-A114686.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Dec 21 2005

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified April 11 19:32 EDT 2021. Contains 342888 sequences. (Running on oeis4.)