|
%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
|
