A020382 Numbers k such that the continued fraction for sqrt(k) has period 43.

1153, 1709, 1777, 2129, 2458, 2741, 3226, 3649, 3701, 3961, 4729, 4877, 5818, 5821, 6161, 6473, 6746, 7034, 7274, 7433, 8117, 8273, 9277, 9370, 9626, 10345, 11125, 11194, 11197, 11530, 11633, 11821, 11861, 12209, 12437, 12701, 12938, 13274, 13289

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

cf43Q[n_]:=Module[{s=Sqrt[n]}, !IntegerQ[s]&&Length[ ContinuedFraction[s][[2]]]==43]; Select[Range[15000], cf43Q] (* Harvey P. Dale, Nov 26 2012 *)

Crossrefs

Cf. A003285.

Sequence in context: A107557 A364180 A330266 * A185689 A309413 A378717

Adjacent sequences: A020379 A020380 A020381 * A020383 A020384 A020385

Keyword

nonn

Author

David W. Wilson

Status

approved