A038881 Odd primes p such that 11 is a square mod p.
5, 7, 11, 19, 37, 43, 53, 79, 83, 89, 97, 107, 113, 127, 131, 137, 139, 151, 157, 167, 181, 211, 227, 229, 239, 257, 263, 269, 271, 283, 307, 313, 317, 347, 353, 359, 389, 397, 401, 421, 431, 433, 439, 449, 479, 491, 503, 509, 521, 523, 547, 563, 571, 577
Offset: 1
Links
- Zak Seidov, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A038882.
Programs
-
Magma
[p: p in PrimesInInterval(3,577) | not JacobiSymbol(11,p) eq -1]; // Bruno Berselli, Sep 10 2012
-
Mathematica
Select[Prime[Range[120]],! JacobiSymbol[11, #]== -1 &] (* Vincenzo Librandi, Sep 10 2012 *)
-
PARI
forprime(p=2,1000,if(kronecker(11,p)==+1,print1(p,", "))) /* Joerg Arndt, Apr 24 2011 */
Extensions
Added "odd" to definition (otherwise 2 would be a term). - N. J. A. Sloane, Jul 04 2023
Comments