login
Numbers k such that Q(sqrt(-k)) has class number 8.
5

%I #14 May 26 2024 12:42:18

%S 41,62,65,66,69,77,94,95,105,111,113,114,137,138,141,145,154,158,165,

%T 178,183,205,210,213,217,226,238,258,265,273,282,295,299,301,310,313,

%U 322,330,337,345,357,371,382,385,395,418,438,442,445,457

%N Numbers k such that Q(sqrt(-k)) has class number 8.

%H Jinyuan Wang, <a href="/A055110/b055110.txt">Table of n, a(n) for n = 1..131</a>

%H <a href="/index/Qua#quadfield">Index entries for sequences related to quadratic fields</a>

%t Select[Range[10000], MoebiusMu[#] != 0 && NumberFieldClassNumber[Sqrt[-#]] == 8 &] (* _Jinyuan Wang_, Mar 08 2020 *)

%o (PARI) \\ See A005847.

%Y See A003173, A005847, A006203, A046085, A046002, A055109, A046004, A055110, A046006, A055111 for class numbers 1 through 10.

%K nonn,fini,full

%O 1,1

%A _N. J. A. Sloane_, Jun 16 2000