A020442 Period of continued fraction for sqrt(n) contains exactly six 1's.

43, 44, 46, 58, 76, 86, 93, 103, 113, 160, 172, 179, 184, 186, 191, 199, 213, 233, 242, 245, 268, 281, 284, 307, 313, 337, 344, 345, 348, 366, 376, 389, 391, 409, 411, 415, 419, 422, 425, 426, 430, 431, 446, 468, 469, 477, 496, 500, 512, 516, 517, 522, 550, 554, 561

Offset

1,1

Links

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

Mathematica

Select[ Range@ 565, !IntegerQ[ Sqrt@ #] && Count[ ContinuedFraction[ Sqrt@ #][[2]], 1] == 6 &] (* Robert G. Wilson v, Jul 03 2011 *)

Crossrefs

Sequence in context: A259089 A165864 A223746 * A041923 A085468 A113819

Adjacent sequences: A020439 A020440 A020441 * A020443 A020444 A020445

Keyword

nonn

Author

David W. Wilson

Status

approved