login
A020404
Numbers k such that the continued fraction for sqrt(k) has period 65.
1
2293, 2473, 3793, 4666, 5965, 7993, 10093, 10618, 10709, 11261, 11434, 12193, 12917, 13285, 15017, 15434, 15733, 17173, 17929, 19157, 19433, 19945, 20465, 21106, 23026, 24314, 24401, 27130, 27154, 28069, 28906, 31337, 32818, 33802, 34117, 34957, 37274
OFFSET
1,1
MATHEMATICA
cf65Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Length[ ContinuedFraction[ s][[2]]]]==65]; Select[Range[40000], cf65Q] (* Harvey P. Dale, Mar 28 2018 *)
CROSSREFS
Cf. A003285.
Sequence in context: A206103 A251302 A198146 * A180454 A216899 A023323
KEYWORD
nonn
STATUS
approved