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”).

A046007
Discriminants of imaginary quadratic fields with class number 10 (negated).
3
119, 143, 159, 296, 303, 319, 344, 415, 488, 611, 635, 664, 699, 724, 779, 788, 803, 851, 872, 916, 923, 1115, 1268, 1384, 1492, 1576, 1643, 1684, 1688, 1707, 1779, 1819, 1835, 1891, 1923, 2152, 2164, 2363, 2452, 2643, 2776, 2836, 2899, 3028
OFFSET
1,1
COMMENTS
87 discriminants in this sequence (almost certainly but not proved).
LINKS
Steven Arno, M. L. Robinson and Ferrel S. Wheeler, Imaginary quadratic fields with small odd class number, Acta Arithm. 83.4 (1998), 295-330
Duncan A. Buell, Small class numbers and extreme values of L-functions of quadratic fields, Math. Comp., 31 (1977), 786-796.
C. Wagner, Class Number 5, 6 and 7, Math. Comput. 65, 785-800, 1996.
Eric Weisstein's World of Mathematics, Class Number.
MATHEMATICA
Union[(-NumberFieldDiscriminant[Sqrt[-#]] &) /@ Select[Range[14000], NumberFieldClassNumber[Sqrt[-#]] == 10 &]] (* Jean-François Alcover, Jun 27 2012 *)
PROG
(PARI) ok(n)={isfundamental(-n) && qfbclassno(-n) == 10} \\ Andrew Howroyd, Jul 24 2018
(Sage) [n for n in (1..3500) if is_fundamental_discriminant(-n) and QuadraticField(-n, 'a').class_number()==10] # G. C. Greubel, Mar 01 2019
CROSSREFS
KEYWORD
nonn,fini
STATUS
approved