%I M3035 #31 Sep 25 2021 16:17:05
%S 3,17,29,31,43,61,67,71,83,97,107,109,113,149,151,163,181,191,193,199,
%T 227,229,233,257,269,283,307,311,313,337,347,359,389,431,433,439,443,
%U 461,467,479,509,523,541,563,577,587,593,599,631,683,701,709,719,787,821,827,839
%N Primes for which -10 is a primitive root.
%C Union of long period primes (A006883) of the form 4k+1 and half period primes (A097443) of the form 4k+3. - _Davide Rotondo_, Aug 25 2021
%D M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, 1964 (and various reprintings), Table 24.8, p. 864.
%D N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H R. J. Mathar, <a href="/A007348/b007348.txt">Table of n, a(n) for n = 1..10000</a>
%H M. Abramowitz and I. A. Stegun, eds., <a href="http://www.convertit.com/Go/ConvertIt/Reference/AMS55.ASP">Handbook of Mathematical Functions</a>, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].
%H Robert G. Wilson v, <a href="/A005596/a005596.pdf">Letter to N. J. A. Sloane, Aug. 1993</a>
%H <a href="/index/Pri#primes_root">Index entries for primes by primitive root</a>
%t pr=-10; Select[Prime[Range[200 ] ], MultiplicativeOrder[pr, # ] == #-1 & ]
%o (PARI) is(n)=gcd(n,10)==1 && znorder(Mod(-10,n))==n-1 \\ _Charles R Greathouse IV_, Nov 25 2014
%Y Cf. A038880.
%Y Cf. A006883, A097443.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, _Mira Bernstein_, _Robert G. Wilson v_
%E More terms from _N. J. A. Sloane_, Apr 24 2005
%E Edited by _N. J. A. Sloane_, Aug 29 2008 at the suggestion of R. J. Mathar
%E A&S reference and Mathematica program corrected by _T. D. Noe_, Nov 04 2009