cp's OEIS Frontend

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.

A046008 Discriminants of imaginary quadratic fields with class number 11 (negated).

Original entry on oeis.org

167, 271, 659, 967, 1283, 1303, 1307, 1459, 1531, 1699, 2027, 2267, 2539, 2731, 2851, 2971, 3203, 3347, 3499, 3739, 3931, 4051, 5179, 5683, 6163, 6547, 7027, 7507, 7603, 7867, 8443, 9283, 9403, 9643, 9787, 10987, 13003, 13267, 14107, 14683, 15667
Offset: 1

Views

Author

Keywords

Crossrefs

Programs

  • Mathematica
    Reap[ For[n = 1, n < 15000, n++, s = Sqrt[-n]; If[ NumberFieldClassNumber[s] == 11, d = -NumberFieldDiscriminant[s]; Print[d]; Sow[d]]]][[2, 1]] // Union (* Jean-François Alcover, Oct 05 2012 *)
  • PARI
    ok(n)={isfundamental(-n) && quadclassunit(-n).no == 11};
    for(n=1, 16000, if(ok(n)==1, print1(n, ", "))) \\ G. C. Greubel, Mar 01 2019
    
  • Sage
    [n for n in (1..16000) if is_fundamental_discriminant(-n) and QuadraticField(-n, 'a').class_number()==11] # G. C. Greubel, Mar 01 2019

Extensions

a(40)-a(41) from Giovanni Resta, Mar 20 2013