This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A171724 #8 Feb 16 2025 08:33:11 %S A171724 591,623,767,871,879,1076,1111,1167,1304,1556,1591,1639,1903,2215, %T A171724 2216,2263,2435,2623,2648,2815,2863,2935,3032,3151,3316,3563,3587, %U A171724 3827,4084,4115,4163,4328,4456,4504,4667,4811,5383,5416,5603,5716 %N A171724 Discriminants of imaginary quadratic fields with class number 22 (negated). %H A171724 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/ClassNumber.html">Class Number.</a> %t A171724 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 *) %Y A171724 Cf. A046018, A046020. %K A171724 nonn,fini %O A171724 1,1 %A A171724 _N. J. A. Sloane_, Oct 03 2010