A020355 - OEIS

A020355

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

94, 124, 133, 172, 191, 217, 249, 261, 284, 302, 310, 311, 343, 376, 385, 391, 415, 431, 446, 496, 513, 542, 550, 639, 647, 654, 655, 666, 679, 686, 700, 750, 846, 861, 875, 878, 917, 928, 944, 950, 955, 969, 988, 1014, 1038, 1052, 1058, 1131, 1136, 1143, 1146

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..51.

MATHEMATICA

cf16Q[n_]:=Module[{s=Sqrt[n]}, If[IntegerQ[s], 1, Length[ ContinuedFraction[ s] [[2]]]]==16]; Select[Range[1200], cf16Q] (* Harvey P. Dale, Jun 05 2016 *)

CROSSREFS

Sequence in context: A269988 A044974 A257525 * A039551 A100767 A050208

Adjacent sequences: A020352 A020353 A020354 * A020356 A020357 A020358

KEYWORD

nonn

AUTHOR

David W. Wilson

STATUS

approved