|
|
A268155
|
|
Primes which are squares (mod 229).
|
|
2
|
|
|
3, 5, 11, 17, 19, 37, 43, 53, 61, 71, 83, 97, 103, 149, 151, 167, 173, 181, 193, 229, 233, 241, 271, 277, 293, 307, 311, 337, 347, 359, 367, 373, 383, 397, 401, 409, 421, 431, 433, 439, 443, 449, 457, 461, 463, 467, 491, 503, 509, 541, 557, 569, 587, 593, 607, 617, 619, 631, 641, 643, 661, 673, 683, 691, 701, 733, 743, 751, 757
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Appears to be the union of the two disjoint subsequences A141165 and A141166.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[140]], JacobiSymbol[#, 229] != -1 &] (* Bruno Berselli, Jan 27 2016 *)
|
|
PROG
|
(PARI) forprime(p=2, 700, issquare(Mod(p, 229))&&print1(p", "))
(Magma) [p: p in PrimesUpTo(800) | JacobiSymbol(p, 229) ne -1]; // Bruno Berselli, Jan 27 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|