Search: id:A094613 Results 1-1 of 1 results found. %I A094613 %S A094613 145,328,445,505,520,680,689,777,780,793,840,876,897,901,905,924,1020, %T A094613 1045,1096,1105,1145,1160,1164,1221,1288,1292,1313,1320,1365,1480,1560, %U A094613 1640,1677,1736,1740,1745,1752,1820,1848,1885,1932,2005,2040 %N A094613 Discriminants of real quadratic number fields with class number 4. %H A094613 Eric Weisstein's World of Mathematics, ClassNumber %t A094613 Needs["NumberTheory`NumberTheoryFunctions`"] (*then*) Flatten[Position[ClassNumber/ @Range[2040], 4, {1}]] %Y A094613 Cf. A003656, 094619, A094612, A094614. %Y A094613 Sequence in context: A159777 A051414 A158133 this_sequence A116208 A031702 A031600 %Y A094613 Adjacent sequences: A094610 A094611 A094612 this_sequence A094614 A094615 A094616 %K A094613 nonn %O A094613 1,1 %A A094613 Eric Weisstein (eric(AT)weisstein.com), May 14, 2004 Search completed in 0.001 seconds