login
Rational primes that decompose in the field Q(sqrt(-17)).
3

%I #26 Dec 04 2023 01:49:43

%S 3,7,11,13,23,31,53,71,79,89,101,107,131,137,139,149,157,163,167,199,

%T 211,227,229,257,281,283,293,311,347,349,353,367,373,379,389,409,419,

%U 421,431,433,439,457,461,479,487,499,503,509,547,557,569,571,577,593,607

%N Rational primes that decompose in the field Q(sqrt(-17)).

%H Robert Price, <a href="/A296929/b296929.txt">Table of n, a(n) for n = 1..9978</a>

%H <a href="/index/Pri#primes_decomp_of">Index to sequences related to decomposition of primes in quadratic fields</a>

%F Primes == {1, 3, 7, 9, 11, 13, 21, 23, 25, 27, 31, 33, 39, 49, 53, 63} (mod 68). - _Travis Scott_, Jan 05 2023

%p Load the Maple program HH given in A296920. Then run HH(-17, 200); This produces A296929, A296930, A296931.

%o (PARI) list(lim)=my(v=List()); forprime(p=5,lim, if(kronecker(-17,p)==1, listput(v,p))); Vec(v) \\ _Charles R Greathouse IV_, Mar 18 2018

%K nonn,easy

%O 1,1

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