A330161 Fundamental discriminant D < 0 with the least absolute value such that the smallest prime p such that Kronecker(D,p) = 1 is p = prime(n), negated.
7, 8, 4, 3, 43, 88, 67, 148, 267, 760, 232, 1320, 163, 1848, 45208, 124195, 169603, 85507, 121972, 261627, 424708, 656755, 35230603, 80149435, 154962808, 289615747
Offset: 1
Examples
D = -1848 is the fundamental discriminant D < 0 with the least absolute value such that Kronecker(D,p) <= 0 for p = 2, 3, 5, 7, ..., 41 and Kronecker(D,43) = +1, so a(14) = 1848.
Programs
-
PARI
b(D)=forprime(p=2, oo, if(kronecker(D, p)>0, return(p))) a(n)=my(p=prime(n)); for(D=3, oo, if(isfundamental(-D) && b(-D)==p, return(D)))
Comments