A191060 Primes that are not squares mod 11.
2, 7, 13, 17, 19, 29, 41, 43, 61, 73, 79, 83, 101, 107, 109, 127, 131, 139, 149, 151, 167, 173, 193, 197, 211, 227, 233, 239, 241, 263, 271, 277, 281, 283, 293, 307, 337, 347, 349, 359, 373, 409, 431, 439, 457, 461, 479, 491, 503, 523, 541, 547, 557, 563
Offset: 1
Links
Programs
-
Magma
[p: p in PrimesUpTo(563) | JacobiSymbol(p, 11) eq -1]; // Vincenzo Librandi, Sep 11 2012
-
Mathematica
Select[Prime[Range[200]], JacobiSymbol[#, 11] == -1 &]
Comments