A031427 Least term in period of continued fraction for sqrt(n) is 3.

11, 40, 87, 128, 152, 232, 235, 266, 300, 335, 336, 373, 455, 498, 544, 592, 747, 848, 860, 914, 920, 1110, 1111, 1248, 1320, 1392, 1393, 1547, 1700, 1707, 1708, 1790, 1792, 1876, 1953, 2055, 2240, 2335, 2336, 2632, 2635, 2829, 2844, 2952

Offset

1,1

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000 (first 1000 from Vincenzo Librandi)

Mathematica

Select[Range[3000], !IntegerQ[Sqrt[#]] && Min[ContinuedFraction[Sqrt[#]][[2]]] == 3&] (* Vincenzo Librandi, Feb 06 2012 *)

Crossrefs

Sequence in context: A122014 A342833 A335491 * A147296 A337130 A353447

Adjacent sequences: A031424 A031425 A031426 * A031428 A031429 A031430

Keyword

nonn

Author

David W. Wilson

Status

approved