A020404 Numbers k such that the continued fraction for sqrt(k) has period 65.

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

Links

Chai Wah Wu, Table of n, a(n) for n = 1..10000

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

Adjacent sequences: A020401 A020402 A020403 * A020405 A020406 A020407

Keyword

nonn

Author

David W. Wilson

Status

approved