login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A296935
Rational primes that decompose in the field Q(sqrt(11)).
4
5, 7, 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, 607
OFFSET
1,1
MAPLE
Load the Maple program HH given in A296920. Then run HH(11, 200); This produces A296935, A296936, A038881, A038882.
MATHEMATICA
Select[Prime[Range[120]], KroneckerSymbol[11, #] == 1 &] (* Amiram Eldar, Dec 24 2023 *)
PROG
(PARI) list(lim)=my(v=List()); forprime(p=5, lim, if(kronecker(11, p)==1, listput(v, p))); Vec(v) \\ Charles R Greathouse IV, Mar 18 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Dec 26 2017
STATUS
approved