login
A020371
Numbers k such that the continued fraction for sqrt(k) has period 32.
0
463, 508, 764, 913, 956, 967, 974, 989, 1041, 1063, 1121, 1132, 1135, 1219, 1228, 1276, 1336, 1372, 1447, 1555, 1583, 1591, 1678, 1797, 1834, 1912, 1927, 2004, 2044, 2094, 2151, 2155, 2224, 2398, 2416, 2422, 2447, 2586, 2608, 2710, 2722, 2752, 2815, 2864
OFFSET
1,1
MATHEMATICA
cf32Q[n_]:=Module[{s=Sqrt[n], len}, len=If[IntegerQ[s], 1, Length[ ContinuedFraction[ s][[2]]]]; len==32]; Select[Range[3000], cf32Q] (* Harvey P. Dale, Jan 12 2017 *)
CROSSREFS
Sequence in context: A252251 A139662 A140030 * A234842 A116323 A343542
KEYWORD
nonn
STATUS
approved