Search: id:A001123
Results 1-1 of 1 results found.

%I A001123 M4356 N1825
%S A001123 7,17,31,43,79,89,113,127,137,199,223,233,257,281,283,331,353,401,449,
%T A001123 463,487,521,569,571,593,607,617,631,641,691,739,751,809,811,823,857,
%U A001123 881,929,953,977,1013,1039,1049,1063,1087,1097,1193,1217
%N A001123 Primes with 3 as smallest primitive root.
%D A001123 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, 
               Academic Press, 1995 (includes this sequence).
%D A001123 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 
               (includes this sequence).
%D A001123 M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, 
               National Bureau of Standards Applied Math. Series 55, 1964 (and various 
               reprintings), p. 864.
%D A001123 M. Kraitchik, Recherches sur la Th\'{e}orie des Nombres. Gauthiers-Villars, 
               Paris, Vol. 1, 1924, Vol. 2, 1929, see Vol. 1, p. 57.
%H A001123 T. D. Noe, <a href="b001123.txt">Table of n, a(n) for n=1..1000</a>
%H A001123 M. Abramowitz and I. A. Stegun, eds., <a href="http://www.nrbook.com/
               abramowitz_and_stegun/">Handbook of Mathematical Functions</a>, National 
               Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 
               [alternative scanned copy].
%H A001123 <a href="Sindx_Pri.html#primes_root">Index entries for primes by primitive 
               root</a>
%t A001123 << NumberTheory`NumberTheoryFunctions`; Prime[ Select[ Range[200], PrimitiveRoot[ 
               Prime[ # ]] == 3 & ]]
%t A001123 (* first load *) << NumberTheory`NumberTheoryFunctions` (* then *) Select[ 
               Prime@Range@200, PrimitiveRoot@# == 3 &] (from Robert G. Wilson v 
               (rgwv(at)rgwv.com), May 11 2001)
%o A001123 (PARI) forprime(p=3,1000, if(znprimroot(p)==3,print(p))).
%o A001123 (PARI) { n=0; forprime (p=3, 99999, if (znprimroot(p)==3, n++; write("b001123.txt", 
               n, " ", p); if (n>=1000, break) ) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), 
               Jun 14 2009]
%Y A001123 Cf. A001122, A001124, etc.
%Y A001123 Cf. A019334.
%Y A001123 Sequence in context: A088566 A059845 A006142 this_sequence A094080 A046118 
               A120092
%Y A001123 Adjacent sequences: A001120 A001121 A001122 this_sequence A001124 A001125 
               A001126
%K A001123 nonn
%O A001123 1,1
%A A001123 N. J. A. Sloane (njas(AT)research.att.com).
%E A001123 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), May 10 2001

Search completed in 0.001 seconds