login
Primes p such that Legendre(-6,p) = 0 or 1.
2

%I #8 Dec 27 2017 01:32:10

%S 2,3,5,7,11,29,31,53,59,73,79,83,97,101,103,107,127,131,149,151,173,

%T 179,193,197,199,223,227,241,251,269,271,293,313,317,337,347,367,389,

%U 409,419,433,439,443,457,461,463,467,487,491,509,557,563,577,587,601,607,631,653,659,673,677,683

%N Primes p such that Legendre(-6,p) = 0 or 1.

%C Primes == 1, 2, 3, 5, 7, or 11 (mod 24). - _Robert Israel_, Dec 27 2017

%H Robert Israel, <a href="/A296924/b296924.txt">Table of n, a(n) for n = 1..10000</a>

%p Load the Maple program HH given in A296920. Then run HH(-6, 200); This produces A157437, A191059, and the present sequence.

%p select(isprime, {seq(seq(24*i+j,j=[1,2,3,5,7,11]),i=0..100)});

%Y Cf. A157437, A191059.

%K nonn

%O 1,1

%A _N. J. A. Sloane_, Dec 26 2017