A171724 Discriminants of imaginary quadratic fields with class number 22 (negated).

591, 623, 767, 871, 879, 1076, 1111, 1167, 1304, 1556, 1591, 1639, 1903, 2215, 2216, 2263, 2435, 2623, 2648, 2815, 2863, 2935, 3032, 3151, 3316, 3563, 3587, 3827, 4084, 4115, 4163, 4328, 4456, 4504, 4667, 4811, 5383, 5416, 5603, 5716

Offset

1,1

Links

Table of n, a(n) for n=1..40.

Eric Weisstein's World of Mathematics, Class Number.

Mathematica

Reap[ For[n = 1, n < 6000, n++, s = Sqrt[-n]; If[ NumberFieldClassNumber[s] == 22, d = -NumberFieldDiscriminant[s]; Print[d]; Sow[d]]]][[2, 1]] // Union (* Jean-François Alcover, Oct 05 2012 *)

Crossrefs

Cf. A046018, A046020.

Sequence in context: A204752 A320713 A116170 * A195894 A263555 A156835

Adjacent sequences: A171721 A171722 A171723 * A171725 A171726 A171727

Keyword

nonn,fini

Author

N. J. A. Sloane, Oct 03 2010

Status

approved