login
Numbers k such that the continued fraction for sqrt(k) has period 92.
0

%I #12 Jul 11 2021 07:22:36

%S 2461,2524,3532,3943,4249,4681,4783,5221,5479,5596,6031,6799,7132,

%T 7281,7294,7929,8599,8997,9136,9573,9679,9838,9844,10165,11104,12014,

%U 12214,12631,12734,13006,13228,13327,13504,13679,13744,14188,15205,15571,16003

%N Numbers k such that the continued fraction for sqrt(k) has period 92.

%t cfp92Q[n_]:=Module[{sqrt=Sqrt[n]},!IntegerQ[sqrt]&&Length[ ContinuedFraction[ sqrt][[2]]]==92]; Select[Range[16100],cfp92Q] (* _Harvey P. Dale_, Oct 12 2012 *)

%K nonn

%O 1,1

%A _David W. Wilson_